Bonjour,
je cale sur un truc tout con a faire mais bon je n'y arrive pas  :

Dim AA As Long, BB As Long,
Let AA = FindWindow("ZAZOU", vbNullString)
Let BB = FindWindow("ZIZA", vbNullString)

Voila j'aimerai faire le code suivant :
Si AA ou BB = 0 = procedure
Si AA ou BB >0 = autre procedure

Merci d'avance.

Pour etre plus precis je demande a mon programme de detecté AA et en meme temps BB.
le code ci dessous marche pas.

If AA or BB = 0 then
Beep
End if

Salut,

If AA = 0 or BB = 0 then
Beep
ElseIf A > 0 or BB > 0 then
Beep
End if

__________
  Kenji

Merci beaucoup.
J'aimerais aussi lancer l'ouverture d'un fichier .INI tu aurais une idée ?

salut,

utilises les API GetPrivateProfileString & WritePrivateProfileString

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

HEU ! pour l'ouvrir tt simplement  genre avec notepad ou autre ??

Utilise l'API ShellExecute

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

salut,

pas tout à fait d'accord avec le code de Kenji (hi)

findexecute peut te renvoyer un handle négatif

çà sera donc plutôt :

If (A = 0) xor (BB = 0) then
Beep
else 'forcément
Beep
End if

mais à mon avis çà manque de and quelquepart..., dans les 2 cas il est possible que tu n'aies pas ce que tu attends

---

Prenez un instant pour répondre à ce sondage svp