Home |
Search |
Today's Posts |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I could be wrong, but: -
(1) you don't need 'Me.' in the code (2) you haven't defined what 'RowIndex' is (is it supposed to be 'rowNdx') (3) you haven't defined what 'accountNumber' is after fixing (1) and replacing RowIndex with rowNdx, it sort of worked, by entering 0 in the first 50 rows of column A (which i guess is what Excel is presuming the value of accountNumber is)! hope that helps?! Tim "Jim08" wrote in message ... I have a spreadsheet that has the account number in the first collum of the parent row followed by some children rows that have no account number. I want to load the spreadsheet into an access database and normalize it but I need to load the account number into the children rows. So I tried the code below, it however does nothing. Any help is apprecaited Thanks Jim ' ' Plug account number into mailbox records ' Public Sub plugAccountNumber() Dim accountNumber As Long Dim startRow As Long Dim endRow As Long Dim rowNdx As Long Application.ScreenUpdating = False On Error GoTo EndMacro: ' Just doing 50 as a test startRow = 1 endRow = 50 For rowNdx = startRow To endRow If Me.Cells(rowNdx, 1).Value < "" Then accountNumber = Me.Cells(rowIndex, 1).Value Else Me.Cells(rowIndex, 1).Value = accountNumber End If Next rowNdx EndMacro: On Error GoTo 0 Application.ScreenUpdating = True End Sub |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
sorting clever formula | Excel Worksheet Functions | |||
Any (clever) way to automate ROW:COL in copy/paste??? | Excel Worksheet Functions | |||
I need a clever VLOOKUP formula | Excel Worksheet Functions | |||
Excel code convert to Access code - Concat & eliminate duplicates | Excel Programming | |||
trying to be clever | Excel Programming |