M
MARION
Guest
bonsoir le forum un petit code ci-dessous me pose un soucis, il ne copie que la cellule DN2 et pas DO2 DP2 DQ2 ou est le problème ?
Merci de votre rèponse et bonne nuit a tous
A+ M
Sub reference_titi_Click()
res = MsgBox("voulez vous validez?", vbYesNo)
If res = vbYes Then
With Sheets("saisie quantite")
If .FilterMode = True Then .ShowAllData
End With
ligne = Range("DN6550").End(xlUp).Row
Range("DN" & ligne + 1).Value = Range("DN2Q2").Value
Range("DN2Q2").ClearContents
End If
End Sub
Merci de votre rèponse et bonne nuit a tous
A+ M
Sub reference_titi_Click()
res = MsgBox("voulez vous validez?", vbYesNo)
If res = vbYes Then
With Sheets("saisie quantite")
If .FilterMode = True Then .ShowAllData
End With
ligne = Range("DN6550").End(xlUp).Row
Range("DN" & ligne + 1).Value = Range("DN2Q2").Value
Range("DN2Q2").ClearContents
End If
End Sub