Bonjour,
Dans une macro j'utilise ce code qui marche bien :
J'ai maintenant besoin de faire ma même chose entre deux classeurs. Apres recherche et diverses modifications, j'en suis rendu a ceci :
... qui ne veut pas marcher
La partie copy fonctionne bien, l'offset (0,0) ne pose pas de problèmes non plus. Je pense qu'il s'agit de la partie "Destination", mais je ne comprends pas pourquoi. Mes recherches sur le net ne m'ont pas permis de trouver une raison particulière a cet échec.
Nb : Les feuilles ne sont pas protégées.
Avez-vous une explication ?
Merci.
Dans une macro j'utilise ce code qui marche bien :
Code:
Range("E1:G" & retsu).SpecialCells(xlCellTypeVisible).Copy Destination:=Range("O1")
J'ai maintenant besoin de faire ma même chose entre deux classeurs. Apres recherche et diverses modifications, j'en suis rendu a ceci :
Code:
CSV.Sheets("チェック").Range(ranji(i) & "1:" & ranji(i) & database.Rows.Count).SpecialCells(xlCellTypeVisible).Copy Destination:=eksu.panel.Range("A1").Offset(0, i)
La partie copy fonctionne bien, l'offset (0,0) ne pose pas de problèmes non plus. Je pense qu'il s'agit de la partie "Destination", mais je ne comprends pas pourquoi. Mes recherches sur le net ne m'ont pas permis de trouver une raison particulière a cet échec.
Nb : Les feuilles ne sont pas protégées.
Avez-vous une explication ?
Merci.
Dernière édition: