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
Jacky
Bonsoir,
En rajoutant un anti-slash à la fin du nom en A1 C:TestToto '---------- Sub jj() [a2] = 1 If Dir([a1]) = "" Then [a2] = 0 End Sub '--------- -- Salutations JJ
"dav" a écrit dans le message de news:
Bonjour à tous et merci d'avance à ceux qui prendront le temps de lire mon proplème afin de m'aider...
Voilà j'ai en A1 le chemin d'accés à un répertoire : C:TestToto
Je voudrais avoir en A2 0 si le répertoire C:TestToto est vide 1 si le répertoire C:TestToto contient un ou plusieurs documents
Est-ce réalisable avec une macro?
Bonsoir,
En rajoutant un anti-slash à la fin du nom en A1
C:TestToto
'----------
Sub jj()
[a2] = 1
If Dir([a1]) = "" Then [a2] = 0
End Sub
'---------
--
Salutations
JJ
"dav" <dav_lambich@hotmail.com> a écrit dans le message de news:
1176214934.672293.265680@l77g2000hsb.googlegroups.com...
Bonjour à tous
et merci d'avance à ceux qui prendront le temps de lire mon proplème
afin de m'aider...
Voilà j'ai en A1 le chemin d'accés à un répertoire : C:TestToto
Je voudrais avoir en A2
0 si le répertoire C:TestToto est vide
1 si le répertoire C:TestToto contient un ou plusieurs
documents
En rajoutant un anti-slash à la fin du nom en A1 C:TestToto '---------- Sub jj() [a2] = 1 If Dir([a1]) = "" Then [a2] = 0 End Sub '--------- -- Salutations JJ
"dav" a écrit dans le message de news:
Bonjour à tous et merci d'avance à ceux qui prendront le temps de lire mon proplème afin de m'aider...
Voilà j'ai en A1 le chemin d'accés à un répertoire : C:TestToto
Je voudrais avoir en A2 0 si le répertoire C:TestToto est vide 1 si le répertoire C:TestToto contient un ou plusieurs documents