Yahoo Answers is shutting down on May 4th, 2021 (Eastern Time) and the Yahoo Answers website is now in read-only mode. There will be no changes to other Yahoo properties or services, or your Yahoo account. You can find more information about the Yahoo Answers shutdown and how to download your data on this help page.

Jack P
Lv 5
Jack P asked in Computers & InternetSoftware · 8 years ago

Need to help with an excel formula/VBA script?

I have an Excel sheet with information about auto parts.

Part number is on A2. First Vehicle it fits is on B3. Second Vehicle it fits is on B4. Third vehicle it fits is on B5. And so on and so forth until the next Part Number for the next part. Some parts have hundreds of vehicles they fit. Some have 0 (parts for non-US cars).

I need to have the part number on A3, A4, A5, etc.

Update:

I found a solution in case anyone out there has a similar problem:

Select the entire region in column A you want to fill in

Prsee the F5 key

Select Special

Select Blanks and click Ok

Now all the blank cells chould be chosen

Type in = and press the up arrow

Hit ctrl + enter

2 Answers

Relevance
  • 5 years ago

    i do not recognize the VBA code to do it, yet you should use a conditional format to do it. choose the entire spreadsheet (or the determination of cells which will comprise your records, then click on Conditional Formatting, New Rule.. Use a formula.. and enter this: =A1=$A$a million %. your formatting, and also you're finished. This compares each cellular on your spreadsheet to the cost in A1. If it matches, it will be crammed with your formatted shade.

  • 8 years ago

    You could do it with a macro (you'll want to save a backup copy of the original before running):

    Sub FillDown ()

    dim c as range

    dim rng as range

    set rng = Worksheets("SheetName").Range("A2:A1000" ) 'change to actual sheet and range

    if c.value = "" then

    c.value = c.offset(-1,0).value

    end if

    for each c in rng

    next

    end sub

Still have questions? Get your answers by asking now.