Macro

Résolu/Fermé

Belle journée! - 2 juin 2009 à 08:59
Belle journée! - 2 juin 2009 à 10:17

Bonjour,

J'ai fait une macro mais je voudrais ajouter quelque chose mais je ne sais pas comment faire:

Voici la macro:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
With ActiveCell
Selection.Copy
ActiveSheet.Paste
End With
End Sub

Je voudrais que cette formule marche pour toute la feuille excel sauf pour la sélection x19 à Y586

Pouvez-vous m'aider?

A voir également:

Macro
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Macro word - Guide
Jitbit macro recorder - Télécharger - Confidentialité
Macro logiciel - Télécharger - Organisation
Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur

1 réponse

Réponse 1 / 1

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
2 juin 2009 à 09:41

bonjour,

essaies
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("B3:D14")) Is Nothing Then: Exit Sub
target.copy range("????")
end sub

tu n'indiques pas de destination à ton collage?

Belle journée!
2 juin 2009 à 10:17

Superbe! Ca marche! Merci beaucoup! :-) (Non je n'ai pas de destination bien précise!) J'explique en mettant ma formule j'ai désactivé la touche "copier" et je voulais la mettre dans la formule afin que je puisse de nouveau l'utiliser sauf pour trois colonnes! :-) Merci infiniment.

Discussions similaires

faire une boucle sans VBA

Transformer un chiffre en lettres dans excel sans macro

recup couleur de cellule sans macro

Copie automatique tableau Excel sans macro

tri automatque sur excel sans créer de macro