C
Charles-Kat
Guest
Bonsoir tout le monde,
Je sais c'est une question classique mais je ne sais pas pourquoi ça ne marche pas chez moi. En fait, Range n'a jamais été mon ami. Ca n'a jamais marché.
Je voudrais juste sélectionner deux cellules de coordonnées variables mais il ne comprend pas :
For i = 3 To Ind
Classeur1.Activate
If Classeur1.Cells(i, num_colonne_auj) = lettre_auj Then
Range(Calendrier.Cells(i, 1), Calendrier.Cells(i, 2)).Select
Selection.Copy
Classeur2.Activate
Range("B6").Select
ActiveSheet.Paste
End If
Next i
Et il me plante sur le Range. Je n'arrive pas à faire un select de plusieurs cellules disjointes. Il semblerait que la solution est dans la fonction Range mais ça ne marche pas, ce n'est pas faute d'avoir cherché de l'aide et essayé.
Un grand merci à mon futur sauveur par avance,
Et une très bonne soirée à toutes et à tous,
Charles
Je sais c'est une question classique mais je ne sais pas pourquoi ça ne marche pas chez moi. En fait, Range n'a jamais été mon ami. Ca n'a jamais marché.
Je voudrais juste sélectionner deux cellules de coordonnées variables mais il ne comprend pas :
For i = 3 To Ind
Classeur1.Activate
If Classeur1.Cells(i, num_colonne_auj) = lettre_auj Then
Range(Calendrier.Cells(i, 1), Calendrier.Cells(i, 2)).Select
Selection.Copy
Classeur2.Activate
Range("B6").Select
ActiveSheet.Paste
End If
Next i
Et il me plante sur le Range. Je n'arrive pas à faire un select de plusieurs cellules disjointes. Il semblerait que la solution est dans la fonction Range mais ça ne marche pas, ce n'est pas faute d'avoir cherché de l'aide et essayé.
Un grand merci à mon futur sauveur par avance,
Et une très bonne soirée à toutes et à tous,
Charles