Continue Formula if Data is Available

  • Thread starter Thread starter Dvinechild
  • Start date Start date
D

Dvinechild

Greetings, you're input is greatly appreciated:

Effort: Have column formula populate if there is data in a row AS entered
Deter: Copying formula in enitre column which results maxxing out excel rows
and poor printing

Current Formula:
=IF(Disc_Complete="","",IF(A2=1,"RB",IF(A2=2,"JM",IF(A2=0,""))))

Considerations: Column C will always have data and was thinking to build
something based off of if C was not blank, to have the formula auto populate
into B.

Currently we have to drag/drop as entered which other unfamiliar employees
using worksheet do not manage well. :-)

Suggestions?
 
Realign column input as normally integrated without having users pre-define
format entry as such.
 
Enter the current formula in B2 then run this macro.

Sub Auto_Fill()
Dim Lrow As Long
With ActiveSheet
Lrow = Range("C" & Rows.Count).End(xlUp).Row
Range("B3:B" & Lrow).ClearContents 'get rid of old range
Range("B2:B" & Lrow).FillDown 'fill new range
End With
End Sub


Gord Dibben MS Excel MVP
 
Thanks Gord for the info. I'll try your suggestion after I learn how to run
the macro you suggested. I know how to create a macro, just a little confused
how to interpret what you said. (I'm startin gto not feel like an advanced
user!) Any quick links you can give me so I can read up and incorporate your
suggestion?
Justis
 
With your workbook open and a backup firmly tucked away.

Alt + F11 to open the Visual Basic Editor. Ctrl + r to open Project Explorer.

Select your Workbook/Project and Insert>Module

Copy/paste the code into that module.

Alt + q to go back to Excel Window.

Assumes you have your formula in B2

=IF(Disc_Complete="","",IF(A2=1,"RB",IF(A2=2,"JM",IF(A2=0,""))))

Tools>Macro>Macros.

Select the macro and run it.

The formula will be copied down as far as you have data in column C

Note: it first clears B3 to wherever to get rid of the last range of formulas in
Column B


Gord
 
Back
Top