Sélection d'une cellule d'une feuille
Marie155
Messages postés
11
Statut
Membre
-
lermite222 Messages postés 9042 Statut Contributeur -
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour,
Pouvez vous me dire pourquoi ce code ne fonctionne pas ? j'y réfléchis depuis 1h et je ne vois vraiment pas.
"Sub blabla()
Dim Ws As Worksheet
Dim NoCol As Integer, depart As Integer
'Initialisation
NoCol = 4 '
depart = 7
For Each Ws In ThisWorkbook.Worksheets
If Ws.Name <> "Feuil3" Then
Ws.Cells(depart, NoCol).Select 'l'erreur se produit ici ....
'mon code qui travaille avc ActiveCell
End If
Next Ws
End Sub"
Merciiii
Pouvez vous me dire pourquoi ce code ne fonctionne pas ? j'y réfléchis depuis 1h et je ne vois vraiment pas.
"Sub blabla()
Dim Ws As Worksheet
Dim NoCol As Integer, depart As Integer
'Initialisation
NoCol = 4 '
depart = 7
For Each Ws In ThisWorkbook.Worksheets
If Ws.Name <> "Feuil3" Then
Ws.Cells(depart, NoCol).Select 'l'erreur se produit ici ....
'mon code qui travaille avc ActiveCell
End If
Next Ws
End Sub"
Merciiii
A voir également:
- Sélection d'une cellule d'une feuille
- Verrouiller cellule excel sans verrouiller la feuille - Guide
- Comment imprimer en a5 sur une feuille a4 - Guide
- Bruler une feuille de laurier - Guide
- Comment supprimer une feuille sur word - Guide
- Aller à la ligne dans une cellule excel - Guide
1 réponse
Bonjour,
Probable que tu modifie les valeurs dans la suite de ton code..
essaye en déplacant l'initialisation des variables..
Sinon, poste toute la procédure.
A+
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
Note: Je ne répond pas aux MP pour les questions techniques. Et ma boule de cristal est cassée .
Probable que tu modifie les valeurs dans la suite de ton code..
essaye en déplacant l'initialisation des variables..
For Each Ws In ThisWorkbook.Worksheets
If Ws.Name <> "Feuil3" Then
NoCol = 4 '
depart = 7
'.....
Sinon, poste toute la procédure.
A+
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
Note: Je ne répond pas aux MP pour les questions techniques. Et ma boule de cristal est cassée .
