Macro pour copier

Bonjour

J'ai créer une petite macro pour copier des cellules. J'aimerais après avoir sélectionner la ligne B34:K34 ou B35:K35 ou B36 :K36 ou B37: K 37 ou B38 :K38 ...............appuyer sur le bouton qui contient la macro

par contre je ne pense pas que ma macro soir juste.

Ci dessous ma macro.

Merci

Cdlt

Ma

'Sub copier()

copier Macro

Range("B34:K34").Select

Range("B35:K35").Select

Range("B36:K36").Select

Range("B37:K37").Select

Range("B38:K38").Select

Range("B39:K39").Select

Range("B40:K40").Select'

Bonjour Marius,

Ta macro est faite avec l'enregistreur, ça se voit. Le plus simple est de joindre un fichier type et de nous expliquer ce que tu souhaites, quelle ligne copier, etc ...

Car sinon en soit ce code copie les lignes 34 à 38 mais ça s'arrête là :

Rows("34:38").EntireRow.Copy

Tout dépend de ton besoin.

Bonne soirée.

Bonsoir ;

Merci pour le retour

Voici un fichier essai pour la macro

Pas bien compris : je suppose qu'il faut lire 10 au lieu de 1à. Où est la macro ?

Attache cette macro à ton bouton pour voir :

Sub Macro1()
    Rows(ActiveCell.Row).EntireRow.Copy
End Sub

Bonjour

Merci pour votre retour.

En effet c'est 10 et je n'avais pas mis de macro. Désolé.

J'ai intégré la macro dans le bouton , c'est presque ça mais je voudrais sélectionner qu'un groupe de cellules et non la ligne ??.

Merci

Cdlt

Ma

Bonjour,

En partant sur la base d'Optimix et se basant que sur la range en "B"

Sub Macro1()
    Range("B" & ActiveCell.Row).Copy
End Sub

Bonne journée.

Bonjour

Merci pour ce nouveau retour.Comme cela c'est parfait.

Dernière question lorsque ma cellule, qui contiendra des données résultant d'une formule, sera copier....lors du collage, dans un autre endroit ou autre feuille, suis je obligé de faire collage spécial et cliquer sur valeur car en collant (normal) j'ai la formule de la cellule et non les données ????

Oui, mais après tout dépend de ce que tu veux faire. Si la cellule copiée est appelée à changer, c'est un collage spécial avec liaison qu'il faudra.