Link to home
Start Free TrialLog in
Avatar of Jenedge73
Jenedge73Flag for Afghanistan

asked on

Loop through range VBA

I am trying to use a VBA from one workbook to another.  When i run my vba it looks like my rngcell is = to nothing i need it to be the BU_Range from the BU INFO  sheet.
Can somone help me with this.  THe GXA is a global add on to Excel and should be ignored.  
Thanks




Sub Update_Distribute_For_All_CBC_BU  ()
 
Dim rngCell As Range
 
Application.ScreenUpdating = False
 
For Each rngCell In Range("BU_RANGE")

    Range("SRF-13 Branch Income Statement Act+Bud.xlsx]Options'!$B$4") = rngCell '// change to your input cell //

                                                     
            ' Add this macro to the active workbook to call Spreadsheet Server's clear cache and recalc.
                           
             Call Application.Run("ClearAndRecalc")
                               
             'To the active workbook to call Distribution Manager's Distribute function.
             'Distributes open file to location specified in (Options) sheet

             Call Application.Run("DistributeAll_DAS")
             
Next rngCell
 
End Sub
Update-and-distribute-to-all-CBG.xlsm
SRF-13-Branch-Income-Statement-A.xlsx
ASKER CERTIFIED SOLUTION
Avatar of Steve
Steve
Flag of United Kingdom of Great Britain and Northern Ireland image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of Norie
Norie

Deleted - Misread post.