Buon giorno a tutti.
Vi espongo il mio problema.
Ho una macro perfettamente funzionante se inserita in un foglio e che sfrutta l'evento Worksheet_SelectionChange.
Io invece vorrei modificarla in una macro da poter attivare o disattivare a seconda delle esigenze e da poter usare sul foglio attivo in quel momento.
Come posso fare ? Di seguito la macro che sto utilizzando ..........
Un grazie a tutti !
Dim OldX
Dim OldY
'Serve per colorare la righa su cui si trova la selezione
Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Celle As String
Dim formato As Integer
formato = 0
formato = Cells.FormatConditions.Count
If formato <> 0 Then
Cells.FormatConditions.Delete
End If
'Calcolo le colonne
OldX = Target.Column
OldY = Target.Row
'Colonna
'Celle = Range("A:A").Offset(0, OldX - 1).Address(RowAbsolute:=False, columnAbsolute:=False)
'Riga
Celle = Range("1:1").Offset(OldY - 1, 0).Address(RowAbsolute:=False, columnAbsolute:=False)
'imposto la formattazione condizionale
'Range(Celle).FormatConditions.Add Type:=xlExpression, Formula1:="=$A$1=1"
Range(Celle).FormatConditions.Add Type:=xlExpression, Formula1:="=$A$1="""""
Range(Celle).FormatConditions(1).Interior.ColorIndex = 36
Range(Celle).FormatConditions(1).Borders.Color = RGB(211, 204, 23)
End Sub