PDA

View Full Version : Applying VBA code written in module to all sheets in workbook



happy_camper
05-17-2020, 04:57 PM
Hello Friends:

I'm new to VBA and learning. This is a very rudimentary question and searched for "applying VBA code to all sheets in the workbook" and couldn't really find anything. I tried some solutions from the web, which look logical but isnt applying my code to all the worksheets

I enclosed my code in the following:

Sub jashdjkhad()

For Each ws In Worksheets
##CODE WENT HERE##
Next ws

End Sub

I thought the text in red above should make it run on all the sheets in the workbook? Thanks for the help.

Paul_Hossler
05-17-2020, 05:54 PM
Depends if you use the 'ws' loop variable correctly

Could be other reasons but this is the most common





Option Explicit


Sub jashdjkhad()
Dim ws As Worksheet
For Each ws In Worksheets
MsgBox ws.Range("A1").Value
Next ws
End Sub




Sub jashdjkhad_1()
Dim ws As Worksheet
For Each ws In Worksheets
MsgBox Range("A1").Value ' No .ws, so uses ActiveSheet
Next ws
End Sub

happy_camper
05-17-2020, 11:21 PM
Thank you Paul. Appreciate your time again.
I tried the option explicit and the variable declaration, but get this error:
2669426695

Paul_Hossler
05-18-2020, 07:01 AM
That means that a variable in Stock_market_data is not defined

ws is defined (Dim ws as Worksheet)

You're probably using other variables that do not have a Dim ?? as ????????