Bonsoir voici un bout de mon code qui copie des valeurs d'un tableau vers un autre tableau en colonne A.
Auriez-vous une macro qui puisse m'avertir par un son de windows, le remplissage d'une cellule A de la feuille "Rétas" ?
Merci à vous.
Sheets("Rétas").Range("A4:A203,G4:G203, H4:H203").ClearContents
Dim dlg As Integer
Dim cel As Range
With Sheets("Références")
For Each cel In .Range("B1:B" & .Range("B" & Rows.Count).End(xlUp).Row)
'If UCase(cel.Value) <> .Range("G5") Then
If UCase(cel.Value) <> .Range("G5") And UCase(cel.Value) <> .Range("G6") Then
dlg = Sheets("Rétas").Range("A" & Rows.Count).End(xlUp).Row + 1
Sheets("Rétas").Range("A" & dlg) = .Range("A" & cel.Row)
Sheets("Rétas").Range("H" & dlg) = .Range("C" & cel.Row)
Sheets("Rétas").Range("G" & dlg) = .Range("B" & cel.Row)
End If
Next
Sheets("Rétas").Select
End With