Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
Essaie ceci :
With Worksheets(1) .Range(.Cells(123, 7), .Cells(157, 7 - nbrJourAV + 1)).Copy _ Sheets("Feuil2").Range("C5") End With
Il est préférable d'utiliser "Le nom de l'onglet plutôt que son index ... c'est plus parlant. Il est encore mieux d'utiliser le nom de la propriété "Name" de l'objet feuille que tu peux observer dans la fenêtre de l'éditeur de code
"Robert" a écrit dans le message de news: O1HELjm$ Bonjour Si j'utilise le code ci dessous :ça marche
With Worksheets(1)
.Range(.Cells(123, 7), .Cells(157, 7 - nbrJourAV + 1)).Copy _
Sheets("Feuil2").Range("C5")
End With
Il est préférable d'utiliser "Le nom de l'onglet plutôt que son index ... c'est plus parlant.
Il est encore mieux d'utiliser le nom de la propriété "Name" de l'objet feuille que tu peux
observer dans la fenêtre de l'éditeur de code
"Robert" <nospamrg31@free.fr> a écrit dans le message de news:
O1HELjm$GHA.1556@TK2MSFTNGP03.phx.gbl...
Bonjour
Si j'utilise le code ci dessous :ça marche
With Worksheets(1) .Range(.Cells(123, 7), .Cells(157, 7 - nbrJourAV + 1)).Copy _ Sheets("Feuil2").Range("C5") End With
Il est préférable d'utiliser "Le nom de l'onglet plutôt que son index ... c'est plus parlant. Il est encore mieux d'utiliser le nom de la propriété "Name" de l'objet feuille que tu peux observer dans la fenêtre de l'éditeur de code
"Robert" a écrit dans le message de news: O1HELjm$ Bonjour Si j'utilise le code ci dessous :ça marche
With Worksheets(1) .Range(.Cells(123, 7), .Cells(157, 7 - nbrJourAV + 1)).Copy _ Sheets("Feuil2").Range("C5") End With
Il est préférable d'utiliser "Le nom de l'onglet plutôt que son index ... c'est plus parlant. Il est encore mieux d'utiliser le nom de la propriété "Name" de l'objet feuille que tu peux observer dans la fenêtre de l'éditeur de code
"Robert" a écrit dans le message de news: O1HELjm$ Bonjour Si j'utilise le code ci dessous :ça marche
With Worksheets(1)
.Range(.Cells(123, 7), .Cells(157, 7 - nbrJourAV + 1)).Copy _
Sheets("Feuil2").Range("C5")
End With
Il est préférable d'utiliser "Le nom de l'onglet plutôt que son index ... c'est plus parlant.
Il est encore mieux d'utiliser le nom de la propriété "Name" de l'objet feuille que tu peux
observer dans la fenêtre de l'éditeur de code
"Robert" <nospamrg31@free.fr> a écrit dans le message de news:
O1HELjm$GHA.1556@TK2MSFTNGP03.phx.gbl...
Bonjour
Si j'utilise le code ci dessous :ça marche
With Worksheets(1) .Range(.Cells(123, 7), .Cells(157, 7 - nbrJourAV + 1)).Copy _ Sheets("Feuil2").Range("C5") End With
Il est préférable d'utiliser "Le nom de l'onglet plutôt que son index ... c'est plus parlant. Il est encore mieux d'utiliser le nom de la propriété "Name" de l'objet feuille que tu peux observer dans la fenêtre de l'éditeur de code
"Robert" a écrit dans le message de news: O1HELjm$ Bonjour Si j'utilise le code ci dessous :ça marche
