Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Rebonjour les pros de VBA, je voulais savoir si il est possible d'enregistrer deux fois par jour une feuille excel (une matin et une au soir) en format pdf ou protégé sur le drive, cette feuille s'enregistrerait dans un dossier DRIVE dès que l'on appuis sur un bouton "Enregistrer". Le nom du...
Du coup j'ai essayé de remplacer le nom
Private Sub Worksheet_Change(ByVal Target As Range)
par
Private Sub Worksheet_Change1(ByVal Target As Range)
mais du coup ca ne fait aucune action
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If CStr([c3]) = "Arrêt" Then [c4:c17] = Empty
If CStr([c3]) = "Arrêt" Then [G3:G17] = Empty
If CStr([c3]) = "Arrêt" Then [K3:K17] = Empty
Application.EnableEvents = True
End Sub
Private Sub...
Maintenant que j'ai la base j'ai voulu recréer le même principe sur la même feuille mais j'ai un message erreur de compilation - nom ambigu détecté : worksheet_change
Ok en effet je viens d'essayer et ça marche je crois que j'aurais pu y passer la journée mdr. Les deux programmes que vous m'avez donné fonctionne mais j'ai choisi celui de job75 qui ne renvois pas à la cellule b2.
En tout cas merci pour vos réponses, c'est très sympa.
Bonne journée et merci encore
Bonjour oui en effet il ne faut pas effacer à partir de b2 mais b3.
Merci pour votre aide sylvanu et job75, j'ai écrit vos programme dans vba en créant un module mais après je ne sais pas si il faut les affecter et/ou comment le faire.
Bonjour tout le monde, étant novice en macro je galère pour une chose qui risque de vous sembler pas grand chose mais pour moi j'ai beau essayer je n'arrive à rien. J'aurais voulu savoir comment on pouvait faire pour effacer toutes les cellules de la colonne b2:b15 et d'y interdire toute autre...