Copie de valeur dans cellule

Bonjour à toutes et à tous

J'ai 2 feuilles. dans la feuil1, j'ai un contenu de texte en A1.

en A2, j'ai un contenu texte (D par exemple)

en A3, j'ai un contenu en chiffre (25 par exemple).

je voudrais envoyer le contenu de 'feuil1!'A1 dans une cellule de la feuill2, qui correspondrait, dans ce cas, a la cellule (D25).

Je ne trouve nulle part de réponse à ce problème. Merci d'avance!

Salut le forum

Bienvenue comme nouveau membre ExcelYves

Par formule je crois la solution impossible.

Précise l'utlilité de ta demande, on pourraient par macro te fournir une solution adaptable à plusieurs situation.

Mytå

Bonjour

La cellule A2 est nommée Colonne

La cellule A3 est nommée Ligne

La Macro est une XL4 pour servir de base aux spécialistes VBA.

Ici, la macro ne fonctionne que jusqu'à la colonne Z, mais, on peut modifier..

https://www.excel-pratique.com/~files/doc/f5njqClasseur2.xls

Sécurité des macros sur Niveau moyen pour bien réceptionner.

Cordialement

Bonsoir,

Bonsoir, Amadéus

un petit exemple :

https://www.excel-pratique.com/~files/doc/excelyves.xls

le code :

Sub transfert()
Sheets("Feuil2").Range([A2] & [A3]) = [A1]
End Sub

Bonsoir Félix

Décidemment, VBA n'est pas fait pour moi! Merci de ta réponse.

Cordialement

Merci de vos réponses mais j'ai finalement trouvé la réponse. Voci la macro et quelques explications:

Sub Fiche_Client_ModifierInfosFacture()

Dim Colonne As String        'noms de variables facile à identifier...
Dim Ligne As String

Worksheets("Fiche Client").Activate
Range("B23").Select    
Selection.Copy            'copie le contenu à transférer dans la cellule correspondante de la feuille 'liste clients'

Colonne = "Q"            'cette colonne Q correspond à "date et info factures" 
Ligne = Range("E19").Value    'C'est à partir du n° de client que l'on trouve la ligne à modifier (n°client = ligne-1)

Worksheets("Liste Clients").Activate
Range(Colonne + Ligne).Select    'on 
ActiveSheet.Paste

Worksheets("Fiche Client").Activate

End Sub

en gros, voici le problème qui se posait : modifier des contenus de cellules dans une page nommée "liste clients", ou tous les clients sont classés avec un n° unique et des cases avec des contenus du type adr1, adr2, code postal, infos factures, nfos diverses...

je voulais, à partir d'une feuille nommée "fiche client", modifier les informations contenues dans n'importe quelle case pour un client donné. Evidement, il y a souvent des modifications à faire et il fallait que le système soit fiable et rapide, et adaptable à n'importe quel champ de données.

Voici donc le VB qui fait le travail (cette macro est valable pour 1 seul champ, ici la case "dates et infos factures")

Merci à ceux et celles qui se sont penchés sur la question....et à bientôt.

Bonsoir,

un peu plus court :

Sub Fiche_Client_ModifierInfosFacture()
Dim Ligne As String
With Worksheets("Fiche Client")
    Ligne = .Range("E19").Value
    .Range("B23").Copy Worksheets("Liste Clients").Range("Q" + Ligne)
End With
End Sub