espenskeie
Well-known Member
- Joined
- Mar 30, 2009
- Messages
- 636
- Office Version
- 2016
- Platform
- Windows
Hi folks
I try to put together a code that will start a macro whenever a cell is modified in a group of sheets from sheets("X1") to sheets("X40"). I've started out with this, but is seems to be all wrong:
Private Sub Worksheet_Change(ByVal target As Range)
Dim sheetsArray As Sheets
Set sheetsArray = ActiveWorkbook.Sheets(Array("X1", "X2", "X3", "X4", "X5"))
Dim target As Range
Dim sheetObject As Worksheet
If Not Intersect(target, Range.sheetsArray) Is Nothing Then WriteLog
End Sub
Anyone that know how to solve this?
Kind regards
Espen
I try to put together a code that will start a macro whenever a cell is modified in a group of sheets from sheets("X1") to sheets("X40"). I've started out with this, but is seems to be all wrong:
Private Sub Worksheet_Change(ByVal target As Range)
Dim sheetsArray As Sheets
Set sheetsArray = ActiveWorkbook.Sheets(Array("X1", "X2", "X3", "X4", "X5"))
Dim target As Range
Dim sheetObject As Worksheet
If Not Intersect(target, Range.sheetsArray) Is Nothing Then WriteLog
End Sub
Anyone that know how to solve this?
Kind regards
Espen