Besoin d'aide sur conditions!Résolu

Question

Bonjour à tous les forumeurs qui voudront bien jeter un oeil sur mon petit problème!

Je précise, je suis tout juste débutant en VBA...donc merci de ne pas rire à ma demande ;-)

Alors voilà, j'ai crée le code suivant (attribution d'un commentaire selon la valeur texte d'une cellule) : 

Sub commentaires_notes()
    ' Declaration des variables
    Dim qualification2 As String, commentaire As String


    ' valeurs des variables
    qualification2 = Range("AS2")
     ' Conditions
    If qualification2 = "ONGLET 1" Then
        commentaire = "CONFORME"
    ElseIf qualification2 = "ONGLET 2" Then
        commentaire = "CONFORME"
    ElseIf qualification2 = "ONGLET 3" Then
        commentaire = "NON CONFORME"
    ElseIf qualification2 = "ONGLET 6" Then
        commentaire = "CONFORME"
    ElseIf qualification2 = "ONGLET 7" Then
        commentaire = "NON CONFORME"
    ElseIf qualification2 = "ONGLET 3 (petits écarts)" Then
        commentaire = "CONFORME"
    ElseIf qualification2 = "ONGLET 7 (petits écarts)" Then
        commentaire = "CONFORME"
    ElseIf qualification2 = "AVOIR" Then
        commentaire = "A JUSTIFIER"
    ElseIf qualification2 = "A JUSTIFIER" Then
        commentaire = "A JUSTIFIER"
    ElseIf qualification2 = "NON CONFORME" Then
        commentaire = "A JUSTIFIER"
    
    End If
    
    ' commentaire en BG2
    Range("BG2") = commentaire
End Sub

L'idée, c'est que j'aimerais que mes commentaires "CONFORME", "A JUSTIFIER" et "NON CONFORME" s'appliquent non seulement à la cellule AS2, mais aussi à toutes les cellules de la colonne AS...

Et là je bloque...

Donc si une bonne âme pouvait m'éclairer, je suis preneur! (je précise que je bosse sur EXCEL 2003)...

Merci de votre aide.

HBARCA

fabiendag · Accepted Answer

si tu n'as aucune cellulle vide entre la cellule AS2 et ta toute dernière cellule
tu peux utiliser :
ligne = 2
while range("AS" & ligne) <> ""
  ici tes instructions
wend



Fabien

fabiendag · Answer

Bonjour,
il te le faut sur un nombre de ligne déterminé ou pas ?


Fabien

hbarca · Answer

Oui, enfin prévoir large jusque 4000 lignes.

Pour mon histoire j'ai eu l'idée de déclarer des tableaux à une dimension (un tableau étant en fait une colonne, à savoir dans mon exemple la AS et la BG pour insertion des commentaires). Mais cela ne marche pas...

hbarca · Answer

Merci Fabien!

ucfoutu · Answer

Bonjour,
J'ai donné dans la discussion qui suit :
Tapez le texte de l'url ici.
une solution flexible, à adapter pour ton cas.
________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

Besoin d'aide sur conditions!

5 réponses

Votre réponse

Discussions similaires