demarer une macro vba si cellule A1 est égale au nom du fichier

nicroq · 8 Octobre 2015

bonsoir a tous et merci pour votre aide

je souhaiterai faire un test avant que ma macro se lance,
je souhaiterai qu'elle verifie si la cellule A1 est égale au nom du fichier .xls.

Par exemple mon fichier s se nomme "test.xls"
chemin : C:\dossier\monfichier\test.xls

donc la suite de ma macro se lance si et seulement si en cellule A1 il y a écrit "test"

en vous remerciant

Cdlt

Staple1600 · 8 Octobre 2015

Re : demarer une macro vba si cellule A1 est égale au nom du fichier

Bonsoir à tous

nicroq
A tester

Code:

Sub a()
If [A1].Text = Split(ThisWorkbook.Name, ".")(0) Then
MsgBox "je lance la macro"
Else
MsgBox "Impossible de poursuivre l'éxécution de la macro!", vbCritical
Exit Sub
End If
End Sub

nicroq · 11 Octobre 2015

Re : demarer une macro vba si cellule A1 est égale au nom du fichier

meci staple1600

ca marche nikel !!!!
bon dimanche

demarer une macro vba si cellule A1 est égale au nom du fichier

nicroq

XLDnaute Occasionnel

Staple1600

XLDnaute Barbatruc

nicroq

XLDnaute Occasionnel

Discussions similaires

demarer une macro vba si cellule A1 est égale au nom du fichier

nicroq

XLDnaute Occasionnel

Staple1600

XLDnaute Barbatruc

nicroq

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency