A voir également:
- Procédure VBA toute simple
- Simple ocr - Télécharger - Bureautique
- Iphone 14 simple - Guide
- Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
- Find vba - Astuces et Solutions
- Incompatibilité de type vba ✓ - Forum Programmation
1 réponse
Utilisateur anonyme
2 nov. 2007 à 22:17
2 nov. 2007 à 22:17
Bonjour,
voici un exemple :
Lupin
voici un exemple :
Option Explicit
'
' Un tableau
Sub Tableau()
Dim MonTableau(100) As String
Dim Boucle As Integer
For Boucle = 0 To 99
If (MonTableau(Boucle) = 0) Then
MonTableau(Boucle) = ""
End If
Next Boucle
End Sub
'
' Ou une plage de cellule
Sub Traitement_Cellule()
Dim Plage As Range, Cible As Range
Set Plage = Range("A1:A100")
For Each Cible In Plage
If (Cible.Value = 0) Then
Cible.Value = ""
End If
Next Cible
End Sub
'
Lupin
