|
MÉTHODE POUR ENTRER UN CONTENU DANS UNE PLAGE
|
|
 I.
Remplir automatiquement une plage.
|
| Méthode |
Action |
| MaPlage.AutoFill(Destination, Type) |
Exécute une recopie incrémentée à partir
de MaPlage vers la plage Destination,
selon le Type indiqué. Pour le type, consultez
l'aide en ligne. |
| MaPlage.FillDown |
Le contenu et le format de la ou des
cellules de la ligne du haut de MaPlage sont copiés dans
toutes les autres lignes de cette plage. |
| MaPlage.FillUp |
Le contenu et le format de la ou des
cellules de la ligne du bas de MaPlage sont copiés dans toutes
les autres lignes de cette plage. |
| MaPlage.FillLeft |
Le contenu et le format de la ou des
cellules de la colonne la plus à droite de MaPlage sont copiés
dans toutes les autres colonnes de cette plage. |
| MaPlage.FillRight |
Le contenu et le format de la ou des
cellules de la colonne la plus à gauche de MaPlage sont copiés
dans toutes les autres colonnes de cette plage. |
| MaPlage.GoalSeek(Goal, ChangingCell) |
Calcule les valeurs nécessaires
pour atteindre un résultat spécifique. Si celui-ci
est un montant renvoyé par une formule, cette méthode
calcule une valeur qui, lorsqu'elle est fournie à la formule,
oblige cette formule à renvoyer le résultat. Renvoie True si
le résultat est atteint. Où Goal est
la valeur que la cellule doit atteindre et ChangingCell représente
la cellule qui doit être modifiée pour obtenir le résultat |
| MaPlage.DataSeries(Rowcol, Type,
Date, Step, Stop, Trend) |
Crée une série de données
dans MaPlage, où :
Rowcol = xlRows ou xlColumns pour
que la série de données soit saisie en lignes
ou en colonnes.
Type peut être: xlDataSeriesLinear (série
linéaire, par défaut), xlGrowth, xlChronological (chronologique)
ou xlAutoFill.
Date : Si l'argument Type a la valeur xlChronological,
l'argument Date indique l'unité de mesure du temps
: xlDay (par défaut), xlWeekday, xlMonth ou xlYear.
Step : La valeur de progression de la série (1 par défaut).
Stop : La valeur de fin de la série. Si vous ne spécifiez
pas cet argument, le remplissage se poursuit jusqu'en fin de plage.
Trend : Affectez-lui la valeur True pour créer une
progression linéaire ou géométrique ou la valeur False (par
défaut) pour créer une série de données standard. |
Exemple :
Sub RemplirSerie()
Dim C As Byte
For C = 1 To 3
Cells(1, C) = C
Next C
Range("A1").AutoFill Range("A1:A20"), xlFillSeries
Range("B1:C20").FillDown
Range("C1:E1").FillRight
Range("E1").AutoFill Range("E1:E20"), xlFillCopy
End Sub
Vous avez 2 méthodes pour effacer le contenu d'une plage :
- Clear efface entièrement la cellule, son
contenu et son format.
- ClearContents n'efface que le contenu mais pas le format.
Sub Effacer()
Dim L As Byte
For L = 1 To 3
Range("A" & L) = "Texte n°" & L
Range("A" & L).Interior.Color =
RGB(255, 255, 103)
Next L
If MsgBox("Effacer entièrement la cellule A2 ?",
vbYesNo + vbCritical) = vbYes Then
Range("A2").Clear
Else
Range("A2").ClearContents
End If
End Sub
La méthode Replace permet de rechercher puis de remplacer des
caractères dans les cellules de la plage spécifiée.
La syntaxe est la suivante :
MaPlage.Replace(What, Replacement, LookAt, SearchOrder, MatchCase, MatchByte) où :
- What est la chaîne à trouver. Obligatoire.
- Replacement est la chaîne de remplacement.
- LookAt précise si la recherche s'effectue dans
la cellule entière (xlWhole) ou non (xlPart).
- SearchOrder indique dans quel sens la recherche doit
se faire, xlByColumns ou xlByRows.
- MatchCase doit être égal à True si
vous voulez respecter la casse.
- MatchByte rarement utilisé.
|
