Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel pardon par avance

pardon par avance

3 réponses
Avatar
moi
donc voila je debute en vba
J'aimerais que mon debut de macro se lance a l'ouverture de mon classeur
appele essai et que si la valeur de G3<>"" alors supprimmer le nom des
cellules B3:G3
et j'en suis là.......

Private Sub mamacro()
Range("g3").Select
If Selection.Value <> "" Then
MsgBox ("bravo")
End If

End Sub





End Sub
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
ru-th
Salut

si j'ai bien compris le nom des cellules B3:G3 c'est le contenu ?
si oui
à mettre dans le module thisworkbook

Private Sub Workbook_Open()
if [feuil1!g3]<>"" then [feuil1!B3:G3].clearcontents
End Sub

ou dans un module standard

sub auto_open()
if [feuil1!g3]<>"" then [feuil1!B3:G3].clearcontents
end sub

--
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"moi" a écrit dans le message de
news:ci7g7m$ge4$
donc voila je debute en vba
J'aimerais que mon debut de macro se lance a l'ouverture de mon classeur
appele essai et que si la valeur de G3<>"" alors supprimmer le nom des
cellules B3:G3
et j'en suis là.......

Private Sub mamacro()
Range("g3").Select
If Selection.Value <> "" Then
MsgBox ("bravo")
End If

End Sub





End Sub





Avatar
moi
Merci de ta reponse si rapide.
Nom c le nom des cellule, insertion/nom
mais je suis super debutante en vba g juste fais du pascal moi avant alors
je rame trop....
c quoi le module general?
"ru-th" a écrit dans le message de news:

Salut

si j'ai bien compris le nom des cellules B3:G3 c'est le contenu ?
si oui
à mettre dans le module thisworkbook

Private Sub Workbook_Open()
if [feuil1!g3]<>"" then [feuil1!B3:G3].clearcontents
End Sub

ou dans un module standard

sub auto_open()
if [feuil1!g3]<>"" then [feuil1!B3:G3].clearcontents
end sub

--
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"moi" a écrit dans le message de
news:ci7g7m$ge4$
donc voila je debute en vba
J'aimerais que mon debut de macro se lance a l'ouverture de mon
classeur


appele essai et que si la valeur de G3<>"" alors supprimmer le nom des
cellules B3:G3
et j'en suis là.......

Private Sub mamacro()
Range("g3").Select
If Selection.Value <> "" Then
MsgBox ("bravo")
End If

End Sub





End Sub









Avatar
moi
g essayer mais la macro ne se declance pas lorque la valeur de g3 change...
"moi" a écrit dans le message de news:
ci7i3c$lsl$
Merci de ta reponse si rapide.
Nom c le nom des cellule, insertion/nom
mais je suis super debutante en vba g juste fais du pascal moi avant alors
je rame trop....
c quoi le module general?
"ru-th" a écrit dans le message de news:

Salut

si j'ai bien compris le nom des cellules B3:G3 c'est le contenu ?
si oui
à mettre dans le module thisworkbook

Private Sub Workbook_Open()
if [feuil1!g3]<>"" then [feuil1!B3:G3].clearcontents
End Sub

ou dans un module standard

sub auto_open()
if [feuil1!g3]<>"" then [feuil1!B3:G3].clearcontents
end sub

--
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"moi" a écrit dans le message de
news:ci7g7m$ge4$
donc voila je debute en vba
J'aimerais que mon debut de macro se lance a l'ouverture de mon
classeur


appele essai et que si la valeur de G3<>"" alors supprimmer le nom des
cellules B3:G3
et j'en suis là.......

Private Sub mamacro()
Range("g3").Select
If Selection.Value <> "" Then
MsgBox ("bravo")
End If

End Sub





End Sub