Création macro

Fermé

toph54 Messages postés 56 Date d'inscription mardi 20 janvier 2009 Statut Membre Dernière intervention 19 janvier 2017 - 19 janv. 2017 à 21:18
Patrice33740 Messages postés 8561 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 15 mars 2025 - 20 janv. 2017 à 00:17

Bonjour,

Suite à un problème concernant la protection des cellules, je me retrouve avec une solution (macro) qui fonctionne.
Sauf que je suis bloqué sur ma macro.
Ci joint l'ébauche que j'ai faite mais malheureusement elle ne correspond pas à mes attentes.

Maintenant j'aimerai pouvoir faire la même avec une zone à copier non défini ainsi que la cellule définissant la zone de collage
Merci par avance pour vos conseils précieux

Sub copier()
'
' copier Macro
'
' Touche de raccourci du clavier : Option+Cmd+y
'
ActiveSheet.Unprotect
ActiveWindow.SmallScroll Down:=68
ActiveWindow.SmallScroll ToRight:=-1
ActiveWindow.SmallScroll Down:=25
ActiveCell.Offset(43, 0).Range("A1:I58").Select
ActiveCell.Offset(100, 8).Range("A1").Activate
Selection.Copy
ActiveWindow.SmallScroll Down:=-1
ActiveCell.Offset(1, -8).Range("A1").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub

A voir également:

Création macro
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Creation compte gmail - Guide
Création site web - Guide
Création compte google - Guide
Media creation tool - Télécharger - Systèmes d'exploitation

1 réponse

Réponse 1 / 1

Patrice33740 Messages postés 8561 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 15 mars 2025 1 779
20 janv. 2017 à 00:17

Bonjour,

Cette macro est issue de l'enregistreur de macro, les lignes :
ActiveWindow.SmallScroll Down:=68
ActiveWindow.SmallScroll ToRight:=-1
ActiveWindow.SmallScroll Down:=25
et
ActiveWindow.SmallScroll Down:=-1
sont inutiles et peuvent être supprimées.

« Maintenant j'aimerai pouvoir faire la même avec une zone à copier non défini ainsi que la cellule définissant la zone de collage »
Ça c'est absolument impossible !!!
Pour copier une plage de cellules il est impératif de définir cette plage et pour la coller il faut obligatoirement définir à quel endroit.

Je pense que tu exposes très mal ton problème. Expliques en détail comment tu voudrais procéder et ce que tu voudrais comme résultat.