VBA Methode range a échouée
Résolu/Fermé
Bonjour,
je suis en train de programmer en VBA excel
j'ai un compteur j qui doit me fournir un numéro de ligne.
je souhaite faire fusionner des cellules. il faut donc que je selectionne les cellules a fusionner et appliquer la formule or je ne comprend pas pourquoi il me dit que ma méthode range a échouée cela me semble correct...
Pourriez-vous m'éclairer sur la question
je suis en train de programmer en VBA excel
j'ai un compteur j qui doit me fournir un numéro de ligne.
je souhaite faire fusionner des cellules. il faut donc que je selectionne les cellules a fusionner et appliquer la formule or je ne comprend pas pourquoi il me dit que ma méthode range a échouée cela me semble correct...
Pourriez-vous m'éclairer sur la question
Workbooks("etude delai.xls").Sheets("Feuil1").Range("A" & j & " : H" & j).Select
A voir également:
- La méthode range de l'objet _global a échoué
- Input signal out of range ✓ - Forum Matériel & Système
- Vente objet occasion entre particulier - Guide
- La méthode range de l'objet worksheet a échoué ✓ - Forum VB / VBA
- Dans la messagerie ci-dessous, envoyez un nouveau message à manon (manon@pixmail.org) en mettant en copie nina (nina@pixmail.org) : objet : colis bonjour, votre colis est arrivé. que répond manon ? ✓ - Forum Loisirs / Divertissements
- Erreur "La méthode Range de l'objet global a échoué" ✓ - Forum VB / VBA
8 réponses
Range("C10:D20").Select
Selection.Copy
Sheets("Feuil2").Select
Range("B7").Select
ActiveSheet.Paste
Ne pas confondre feuille selectionnée et feuille active...
Soit tu écris :
Range("C10:D20").Select
Selection.Copy
Sheets("Feuil2").Select
Range("B7").Select
Selection.Paste
Soit :
Range("C10:D20").Select
Selection.Copy
Sheets("Feuil2").Activate
Range("B7").Activate
ActiveCell.Paste
Selection.Copy
Sheets("Feuil2").Select
Range("B7").Select
ActiveSheet.Paste
Ne pas confondre feuille selectionnée et feuille active...
Soit tu écris :
Range("C10:D20").Select
Selection.Copy
Sheets("Feuil2").Select
Range("B7").Select
Selection.Paste
Soit :
Range("C10:D20").Select
Selection.Copy
Sheets("Feuil2").Activate
Range("B7").Activate
ActiveCell.Paste