Discussion :

[FrancisZheng]

Bonjour :

J'ai eu une erreur de compilation à la deuxième ligne à "jourMois As Integer" :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub Positionnement()
Dim lastCol, lastLig, nomSemaine, newCol, mois, jourMois, i, j, k, l, lastLigCsv, exit1, jourMois As Integer
Dim a, b As Boolean

Cela ne m'est jamais arrivé avant et je ne sais pas pourquoi.

Merci d'avance.

[DonkeyPuncher]

Bonjour !

Tu déclares deux fois la même variable dans la liste !

[pijaku]

Bonjour,

Effectivement, tu déclares deux fois la variable jourMois :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sub Positionnement()
Dim lastCol, lastLig, nomSemaine, newCol, mois, jourMois, i, j, k, l, lastLigCsv, exit1, jourMois As Integer

De plus, de la manière dont tu fais ta déclaration, la quasi totalité de tes variables est déclarée As Variant.
En effet, il convient, en VBA de typer chaque variable.

Ainsi, ta déclaration devrait être :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub Positionnement()
Dim lastCol As Integer, lastLig As Integer, nomSemaine As Integer, newCol As Integer, mois As Integer
Dim i As Integer, j As Integer, k As Integer, l As Integer, lastLigCsv As Integer, exit1 As Integer, jourMois As Integer
Dim a As Boolean, b As Boolean

Une autre petite chose, le nombre de lignes peut éventuellement dépasser la limite des Integer. Donc, pour les variables représentants le numéro des lignes et les variables servant pour des boucles, il convient de préférer Long plutôt qu'Integer.
Donc :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub Positionnement()
Dim lastCol As Integer, lastLig As Long, nomSemaine As Integer, newCol As Integer, mois As Integer
Dim i As Long, j As Long, k As Long, l As Long, lastLigCsv As Long, exit1 As Integer, jourMois As Integer
Dim a As Boolean, b As Boolean

Dernier détail, il vaut mieux donner aux variables des noms explicites. Lorsque l'on revient sur le code quelques temps plus tard c'est plus facile de savoir qu'elle variable sert à quoi...

Je précise que tout ceci n'est pas bloquant, mais peut réellement aider.

[FrancisZheng]

Bonjour !

Tu déclares deux fois la même variable dans la liste !

Oui. Question bête. J'aurais dû le remarquer. Merci

Merci beaucoup pijaku! Je ne savais pas qu'on ne pouvait pas mettre "As Integer" à la fin de plusieurs variables. Merci pour ton explication précise

Et au passage bravo pour les Cours Excel c'est utile.