XL 2016 VBA excel

[René 974]

Bonjour,

Je suis novice dans excel et VBA.
Je souhaiterai trouver une formule excel et VBA pour dire.

Si Poste ="AB" puis Poste ="BC" alors….(mettre la condition

Merci d'avance

René

 

[dg62]

Bonjour Rene

les deux tâches sont bien successives (puis) ?
Un petit exemple serait plus parlant avec le résultat escompté.

 

[René 974]

Bonjour dg62

Merci et pour la transcrire en vba çà donnerait quoi stp?

 

[René 974]

Pour illustrer mes propos,
J'ai cette partie de macro:

Et maintenant je souhaiterai dire:
If Poste = "AB" suivi de Poste "BC" Then
Cells(m; k)=SKU
Cells(m + 6; k)=SKU
End if

 

[Phil69970]

Bonjour Rene 974, dg62

Si j'ai bien compris ? (mais cela me semble trop simple comme réponse)

Et maintenant je souhaiterai dire:
If Poste = "AB" suivi de Poste "BC" Then

If Poste = "AB" Then
    If Poste = "BC" Then
        Cells(m, k) = SKU
        Cells(m + 6, k) = SKU
    End If
End If

Cordialement

 

[dg62]

Bonjour Rene 974, dg62

Si j'ai bien compris ? (mais cela me semble trop simple comme réponse)

If Poste = "AB" Then
    If Poste = "BC" Then
        Cells(m, k) = SKU
        Cells(m + 6, k) = SKU
    End If
End If

Cordialement

Bonjour Phil,
Poste ne peut prendre deux valeurs en même temps.

 

[dg62]

Re,
Une piste
Initialiser une variable à 1 quand le poste passe à AB et +1 à BC
tester si la variable est égale à 2
faire le traitement et réinitialiser à 0


René plutôt que de mettre une image du code il est préférable de l'intégrer directement à l'aide des balises.

 

[Phil69970]

Bonjour Rene 974, dg62

Exact la prochaine fois je lirais un peu mieux l'énoncé

Cordialement

 

[dg62]

Exemple

Dim flag As Byte

flag = 0 'indicateur de passage à AB

If Poste = "AB" Then
flag = 1
'traitement
ElseIf Poste = "BC" Then
flag = flag + 1
'traitement
ElseIf flag = 2 Then 'si flag=2 je suis passé obligatoirement par AB dans la boucle précédente'traitement
flag = 0

 

[René 974]

Bonjour,

Merci à vous.
Je vais tester tout çà.

 

[René 974]

Bonjour,

Je vous joins mon fichier.
Grâce à vos conseils j'ai mis le doigt sur mon problème. (expliqué sur le fichier word).
La macro vient lire des données dans la feuille TAXIVF et les colle dans les cellules blanches du tableau dans la feuille Planning VF .

Ce que je souhaiterai éviter:
Que la macro efface valeur dans une case blanche qui a déjà été renseignée, mais qu'elle continue le traitement pour les autres cellules.

Pourriez vous m'aider svp?

Merci d'avance

 

[dg62]

Bonjour René 974

j'ai modifié votre code pouvez-vous vérifier le résultat attendu ?

 

[René 974]

Merci de votre aide.

j ai encore une question toujours concernant mon fichier.

J ai les conditions suivantes A, B, C, AB, BC, ABC.

J ai pour une machine des données qui sont renseignées pour une condition AB.

quand je lance ma macro, elle copie les données AB pour la première Date puis ABC pour toutes les autres dates de la semaine.

Dès que je déplace la condition AB vers le haut ou le bas de ma macro, l extraction donne des résultats complètement faux.

J ai vu sur les forums qu une personne avait rencontré le même problème que moi mais pas de solution pérenne à lui proposer.

merci d avance

 

[dg62]

Bonsoir Rene
Est-ce que le code actuel fonctionne comme vous le souhaitez
Ou parlez- vous du votre ?

 

[René 974]

Bonjour votre macro répond mes attentes merci.
Le problème vient d une macro que j ai fait en utilisant If ElseIf ElseIf ElseIf End If.