cs_jeyjey1
Messages postés46Date d'inscriptionmardi 3 avril 2007StatutMembreDernière intervention 8 février 2010
-
18 avril 2008 à 11:20
PCPT
Messages postés13280Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 2018
-
18 avril 2008 à 21:35
Bonjour,
J'ai problème avec ma condition (en rouge), je n'arrive pas à trouver quelque chose pour dire que si dans ma cellule on trouve le mot 'Xls' (parmi d'autres mots), on continue
Est ce que quelqu'un aurait une idée, merci
Dim fich As String
Feuil1.Activate
Cel.Activate
ActiveCell.Offset(0, 1).Select
fich = ActiveCell.Text
If fich = 'comporte Xls' Then
Else
ShellExecute 0, "open", fich, "", "", SW_SHOWNORMAL
End If
Exit Sub