Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Stepping through cells
New to the world of Excel VBA programming.
I've used a macro so far to chop a large spreadsheet down to the minimum info that I need to work with. It has 13 rows and the number of columns can vary. Row 1 is a header row (will always have a string value) Row 2 is a Text ID row (will always have a string value) Rows 3-13 Text Name row (can have a string value or be empty) Basically need to parse through the spreadsheet and where the cells in rows 3-13 are not blank do some work. Basically create two lines out to a text file for each non-emtpy cell. A B C D etc 1 H1 H2 H3 H4 2 111 222 333 444 3 qrs nji 4 rsd esd 5 fgh asd sew .... 13 ewe erw For this example set I would get the following to a text file: TextID1=H1 TextName1=qrs TextID2=H1 TextName2=fgh TextID3=H2 TextName3=rsd TextID4=H2 TextName4=asd TextID5=H3 TextName5=sew TextID6=H3 TextName6=ewe TextID7=H4 TextName7=nji TextID8=H4 TextName8=esd TextID9=H4 TextName9=erw Doing this in C, Pascal or even Fortran would be fairly straight forward but the Excel VBA cell references and calls is totally unfamiliar. I'm starting to read up on this to understand how it is handled. Any help anyone would be willing to give or pointers to some examples that would lead me in the right direction would be greatly appreciated. Thanks, Kirk |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Stepping through cells
Hi Kirk
Assuming that you deal with the active sheet, and that the looping is the problem, not the text generating: Sub test() Dim R As Long, C As Long C = 1 Do For R = 3 To 13 If Cells(R, C).Value < "" Then MsgBox "Yo! " & Cells(1, C).Value MsgBox Cells(R, C).Value End If Next C = C + 1 Loop Until Cells(1, C).Value = "" End Sub As you may see, Cells is the magic word, addressed like Cells(Rownumber, Columnnumber) HTH. Best wishes Harald "Kirk" skrev i melding ... New to the world of Excel VBA programming. I've used a macro so far to chop a large spreadsheet down to the minimum info that I need to work with. It has 13 rows and the number of columns can vary. Row 1 is a header row (will always have a string value) Row 2 is a Text ID row (will always have a string value) Rows 3-13 Text Name row (can have a string value or be empty) Basically need to parse through the spreadsheet and where the cells in rows 3-13 are not blank do some work. Basically create two lines out to a text file for each non-emtpy cell. A B C D etc 1 H1 H2 H3 H4 2 111 222 333 444 3 qrs nji 4 rsd esd 5 fgh asd sew ... 13 ewe erw For this example set I would get the following to a text file: TextID1=H1 TextName1=qrs TextID2=H1 TextName2=fgh TextID3=H2 TextName3=rsd TextID4=H2 TextName4=asd TextID5=H3 TextName5=sew TextID6=H3 TextName6=ewe TextID7=H4 TextName7=nji TextID8=H4 TextName8=esd TextID9=H4 TextName9=erw Doing this in C, Pascal or even Fortran would be fairly straight forward but the Excel VBA cell references and calls is totally unfamiliar. I'm starting to read up on this to understand how it is handled. Any help anyone would be willing to give or pointers to some examples that would lead me in the right direction would be greatly appreciated. Thanks, Kirk |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Stepping through Code | Excel Discussion (Misc queries) | |||
stepping chart | Charts and Charting in Excel | |||
Stepping Through vs. Play | Excel Discussion (Misc queries) | |||
Stepping through For Each...Next backwards? | Excel Programming | |||
Stepping through a column using FOR/NEXT | Excel Programming |