Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Copier dans la cellule avtive

E

Evelynetfrancois

Guest
bonjour tous le monde (Forum)

voici ma Q
je voudrais
apres avoir selectionner la cellule "A1"
cliquer sur un bouton macro qui me copierait la cellule "B2"
dans "A1"(cellule active )
j'ai recherche avec l'enregistreur , mais sans resultat
merci de me depatouiller
bonne journée et merci d'avance
Evelynetfrancois
 
V

Vériland

Guest
Bonjour Evelynetfrancois et toi le Forum,

tu peux le faire de cette manière avec une macro évènementielle...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Address() = "$A$1" Then
[A1] = Range("B2").Value
End If
End Sub


dès que tu cliques sur la cellule A1 alors s'affiche la valeur de B2 dans celle-ci...

Code à placer dans la feuille active dans VBA...

Bonne programmantion



PS : Macro à copier depuis le forum auquel cas tu risques d'avoir les attributs gras du post dedans...
 
E

Evelynetfrancois

Guest
bonjour: Vériland

Non ça ne convient pas : il ne faut pas que ce soit évènementielle...
mais sur "ordre" : (bouton)

comme un copier coller , avec mise en forme identique etc..
1) je clic la cellule de destination (elle devient donc Active)
2) je clic sur le bouton (là je mets la macro que tu vas surement trouvé , lol !)
3) la cellule active prend alors la "copie" de "B2" (comme un copier coller quoi!! )

en tout cas MERCI pour ta reponse rapide

à bientôt
Evelynetfrancois
 
E

Evelynetfrancois

Guest
Sub Macro1()
ActiveCell = "©" 'ActiveCell (=A1) ="©" (B2)
ActiveCell.Font.Size = 22
ActiveCell.Font.ColorIndex = 3
End Sub
j'ai contourne le prob
merci pour tout
Evelyne
 
V

Vériland

Guest
Re Evelynetfrancois et toi le Forum...

me revoiloù...lol

Ah ok...j'ai pas tout capté alors...hi hi hi...bon ben je te propose néanmoins cette procédure que tu vas pouvoir appeler depuis un bouton...

Option Explicit

Sub coller()
[B2].Copy
ActiveCell.Select
ActiveSheet.Paste
Application.CutCopyMode = True
End Sub


le principe est simple on copie B2 et on colle son contenu dans la cellule active...

et ta cellule B2 quelle soit bleue, verte, rouge, violette, en Gras italique etc...sera reproduite à l'identique dans la cellule active...

Allez bonne programmation



PS : Macro à copier depuis le forum auquel cas tu risques d'avoir les attributs gras du post dedans...
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…