Raury

Hi Steve, Many thanks Raury

Hi, I have a spreadsheet of data with top depths only for a number of layers. The spreadsheet is structured as follows (only Layer_name and Top_Depth columns): [TABLE=class: grid, width: 500, align: left] [TR] [TD]Layer_name[/TD] [TD]Top_Depth[/TD] [TD]BottomDepth[/TD] [/TR] [TR] [TD]T-layer[/TD] [TD]3105.26[/TD] [TD]3127.21[/TD] [/TR] [TR] [TD]T-layer[/TD] [TD]3127.21[/TD] [TD]3135.31[/TD] [/TR] [TR] [TD]T-layer[/TD] [TD]3135.31[/TD] [TD]3135.31[/TD] [/TR] [TR] [TD]V-layer[/TD] [TD]3012[/TD] [TD]3030.8[/TD] [/TR] [TR] [TD]V-layer[/TD] [TD]3030.8[/TD] [TD]3101[/TD] [/TR] [TR] [TD]V-layer[/TD] [TD]3101[/TD] [TD]3108.2[/TD] [/TR] [TR] [TD]V-layer[/TD] [TD]3108.2[/TD] [TD]3112.6[/TD] [/TR] [TR] [TD]V-layer[/TD] [TD]3112.6[/TD] [TD]3112.6[/TD] [/TR] [TR] [TD]Y-layer[/TD] [TD]3305[/TD] [TD]3305.9[/TD] [/TR] [TR] [TD]Y-layer[/TD] [TD]3305.9[/TD] [TD]3327.2[/TD] [/TR] [TR] [TD]Y-layer[/TD] [TD]3327.2[/TD] [TD]3331.6[/TD] [/TR] [TR] [TD]Y-layer[/TD] [TD]3331.6[/TD] [TD]3331.6[/TD] [/TR] [TR] [TD]Z-layer[/TD] [TD]2916[/TD] [TD]3014[/TD] [/TR] [TR] [TD]Z-layer[/TD] [TD]3014[/TD] [TD]3014[/TD] [/TR] [/TABLE] I would like to do the following: (desired results are shown in red in the bottom depth column) 1. Add a third column called Bottom_Depth 2. In each layer, take the top depth of the next line to be the bottom depth of the previous line 3. When it reaches the end of that layer, it will copy the top depth to the bottom depth column. 4. It then continues with part 1 and part 2 above for the next layer. How do I achieve this with a script? There are 900 layers, each layer with at least 10 lines (rows) of depths. Regards, Raury

1 have created 37 sub-folders in the folder PanelA in a portable disc F:. These folders in the portable disc F are empty at the moment. I created the sub-folders from a list in notepad for each sub-folder name. The sub-folders are as follows: R-Ta R-61 R-31 R-Ty R-P1 R-B3 R-N2 R-50 R-1 R-BN1 etc Now in H:\data, the sub-folders listed above contain further sub-sub-folders with files. Example below: Each sub-folder listed above has the following sub-folders 1_Plans 2_Construction 3_Decor 4_Garden 5_Landscape etc I would like to do the following: Copy only the sub-sub folders 2_Construction and 4_Garden and its contents from each to the sub-folders R-Ta R-61, R-31, R-Ty, R-P1, R-B3, R-N2, R-50, R-1, R-BN1 etc from the H drive to the portable disc F. The portable disc F contains the empty sub-folders R-Ta R-61, R-31, R-Ty, R-P1, R-B3, R-N2, R-50, R-1, R-BN1 etc I had created earlier. How do I do that? Thanks Regards Raury

Hi Meldrew, I had the error message %%i was unexpected at this time. - please see attached. Raury

1 would like to create 37 subfolders in the folder PanelA. I have a list in notepad for each subfolder name. I have here a basic script but I cannot get it to read the subfolder names in the notepad (or in the script) ParentFolder = "C:\" Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.Namespace(ParentFolder) objFolder.NewFolder "R-" What shoul dI do to name these folders from the names: R-Ta R-61 R-31 R-Ty R-P1 R-B3 R-N2 R-50 R-1 R-BN1 etc Thanks Regards Raury