|
|
|
|
Bonjour,
Je voudrais faire un petit programme en VBA mais je suis débutant.
Il faudrait que ce programme s'éxécute au démarrage d'excel automatiquement.
Excel contient un tableau de 3 colonnes et d'un nombre de lignes qu'on ne connait pas ( il s'agrandit au fur et à mesure de nouvelles données).
Il faudrait que dès qu'il y a une valeur = 0 dans une cellule de la colonne C, toute cette ligne se mette en rouge. Le programme doit tester tout le tableau.
Merci bcp d'avance pour votre aide
Configuration: Windows XP Internet Explorer 6.0
Bonjour,
Sub controleLigne()
Dim ws As Worksheet
Dim i As Long
Set ws = Worksheets("Feuil1") 'nom de la feuille où le contrôle doit se faire
With ws
i = 1 'Numéro de la première ligne à tester
While .Range("C" & i).Value <> ""
If .Range("C" & i).Value = 0 Then
.Rows(i).Interior.Color = RGB(255, 0, 0)
End If
i = i + 1
Wend
End With
End Sub
Double-cliques sur ThisWorkbook et colles le code ci-dessous : Private Sub Workbook_Open()
Module1.controleLigne
End Sub
Sauvegardes ton fichier, fermes le et relances le ... ;o) polux |
Compter nombre ligne vba Copier ligne vba Couleur d'une cellule vba Couleur selection ligne listbox access vba Couleur variable d une cellule vba Demonter ecran ordi portable medion ligne couleur Excel lignes bi couleur Excel vba correspondance couleur hexa rgb Inserer caractere saut de ligne vba Mettre une ligne en couleur table html Open txt vba lignetexte Palette de couleur vba Sélectionner plus sieurs ligne vba excel Transformer une photos en dessin en ligne sepia et couleur gratuit Vba code couleur Vba determiner couleur de texte dans cellule Vba excel recopier jusqu'à première ligne vierge Vba msgbox couleur
