OVH Cloud OVH Cloud

Référence LettreChiffre vs chiffre

2 réponses
Avatar
Pat59
Bonjour,

J'ai un petit bout de code qui sélectionne puis copie dans une boucle For,
qui passe en revue les colonnes mais qui va plus loin que la colonne "Z"

Sheets("MaFeuille").Select
Range(Chr(maCol) & "5").Select
Selection.Copy

... mais après "Z" i.e. "AA" Ça ne fonctionne plus.

J'ai pensé utilisé
Range(Cells(maLigne, maCol).select
mais sans succès

puis
maValeur = Range(Cells(maLigne, maCol)
sans succès cela me renvoie l'erreur 1004

Je voudrais pouvoir copier le contenu d'une ou plusieurs cellules pour les
coller à un autre endroit, en utilisant des chiffres pour localiser les
colonnes

Merci

Patrice

2 réponses

Avatar
Raymond [mvp]
Bonjour.

je sais bien qu'on vient sur access pour avoir les meilleurs spécialistes
mais dans ton cas , je crois que le médecin serait plutôt sur excel, non ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Pat59" a écrit dans le message de news:

Bonjour,

J'ai un petit bout de code qui sélectionne puis copie dans une boucle For,
qui passe en revue les colonnes mais qui va plus loin que la colonne "Z"

Sheets("MaFeuille").Select
Range(Chr(maCol) & "5").Select
Selection.Copy

... mais après "Z" i.e. "AA" Ça ne fonctionne plus.

J'ai pensé utilisé
Range(Cells(maLigne, maCol).select
mais sans succès

puis
maValeur = Range(Cells(maLigne, maCol)
sans succès cela me renvoie l'erreur 1004

Je voudrais pouvoir copier le contenu d'une ou plusieurs cellules pour les
coller à un autre endroit, en utilisant des chiffres pour localiser les
colonnes

Merci

Patrice


Avatar
Pat59
J'ai finalement trouvé mon erreur,
il ne faut pas écrire

maValeur = Range(Cells(maLigne, maCol))

mais

maValeur = Cells(maLigne, maCol)

Merci





"Pat59" wrote:

Bonjour,

J'ai un petit bout de code qui sélectionne puis copie dans une boucle For,
qui passe en revue les colonnes mais qui va plus loin que la colonne "Z"

Sheets("MaFeuille").Select
Range(Chr(maCol) & "5").Select
Selection.Copy

... mais après "Z" i.e. "AA" Ça ne fonctionne plus.

J'ai pensé utilisé
Range(Cells(maLigne, maCol).select
mais sans succès

puis
maValeur = Range(Cells(maLigne, maCol)
sans succès cela me renvoie l'erreur 1004

Je voudrais pouvoir copier le contenu d'une ou plusieurs cellules pour les
coller à un autre endroit, en utilisant des chiffres pour localiser les
colonnes

Merci

Patrice