Boucle if en visual basic

Fermé
lena - 6 mars 2008 à 12:02
 PHIL - 3 juin 2008 à 08:05
Bonjour,

je souhaite faire une comparaison pour un suivie de commande avec la date d'aujourd hui et la date de livraison de mes commande. Si une livraison est aujourd hui je veux afficher une fenetre me le disant
Mon code est

Sub feuille1()

If d6 = Columns(g) Then
MsgBox " Livraison"
End If

End Sub


Merci de me donner un coup de main sur If d6 = Columns(g) Then je n'arrive pas à trouvé un syntaxe correcte pour lui demander de faire un teste sur toutes les dates de la colonne g de mon tableau excel.

Merci pour votre aide
Léna
A voir également:

4 réponses

Bonjour léna,

a quel moment ton message doit s'afficher ??

Phil
0
lorsque le test entre la date d'aujourd hui et la date de livraison sont les memes
0
j'ai essayé

Sub feuille1()
For i = 1 To 255
If d6 = G("i") Then
MsgBox " Livraison AFF 01 37007 00"
End If
Next

End Sub


problème erreur 13
g = ma colonne excel
i = conteur
0
et avec ca ??:

Sub feuille1()
G = Columns("G")
For i = 1 To 255
If Range("d6") = Range("G" & i & ":G" & i) Then
MsgBox " Livraison AFF 01 37007 00"
End If
Next

End Sub
0
SUPER

ton code fonctionne correctement.
Une autre petite question:
peut on afficher le message "livraison" sur la fenetre du bureau automatiquement sans avoir à ouvrir le fichier excel pour faire tourner le programme?
Merci d'avance
Lena
0
peut être pas impossible .... mais très complexe.

Quel événement doit faire tourner exécuter le code ?? date, heure, ouverture du PC ....???
0
à chaque nouvelle journée je veux executer le code
mais bon c pas grave tu ma deja bien aidé

une petite derniere
Comment je peut faire pour afficher dans une msgbox les données contenu dans une cellule

le but serai de:
lorsque mon test avec la date est vrai je veux afficher une msgbox qui me donne 'livraison" c'est ce que j'ai pour le moment mais qui m'affiche aussi le nom du fournisseur (situé dans la meme ligne que la date tester vrai avec celle d'aujourd hui)

Merci
léna
0
et voila !!

MsgBox " Livraison AFF 01 37007 00" & " " & Range("G" & i & ":G" & i)

G étant la colonne des fournisseurs

A+ Phil
0
merci beaucoup je suis comblé a plus léna
0
Bonjour
Je suis sur mon formulaire et jai 2 champ: un qui précise le nombre de personne (max 7) et un la catégorie (B ou C)
Jvoudrai connaitre le code sous access 2003 qui pourrai me faire ca :

entre 1 à 4 personne le champ catégorie devrai mindiquer B automatiquement dans son champ
Si plus de 4 personnes personnes C

merci de répondre assez rapidement svp.
0
Bonjour,

le code :

If Nombpers < 5 then

Categorie = B

Else

Categorie = C

End if

Nombpers égal le nombre de personne

Bon courage

Phil
0