Convertir macro xl4 en VBA

Convertir macro xl4 en VBA Sujet résolu

Ajouter un message à la discussion

patton

Posté le 04/07/2014 @ 08:41

Bonjour à tous!!

Voilà mon petit souci.

Je veux sélectionner un plage de cellules (toujours la même) mais à chaque fois le numéro de ligne change et, sur un fichier volumineux, cela devient vite fastidieux.
J'ai donc mis au point ma petite macro XL4 mais je ne sais pas la convertir en VBA....

Quelqu'un aurait-il le savoir qui me fait défaut???

=ACTIVER("Feuil1") =POSER.NOM("lig";LIGNE(CELLULE.ACTIVE()))

=SELECTIONNER("L"&lig&"C1:L"&lig&"C7")

Ici quelques actions simples...

=RETOUR()

Vraiment de la grosse macro n'est-ce pas (je n'y suis pas arrivé en VBA du fait du numéro de ligne qui change)

Merci par avance

poussebois

Posté le 04/07/2014 à 09:58

Bonjour ,

Voici une image dans laquelle j'ai sélectionné la plage B4:D8.

Tu voudrais une macro qui fasses que quand tu vas en C6 par exemple, tu sélectionnes la plage C6:E10 ?

Est-ce cela ? Ai-je bien compris ?

@ +

patton

Posté le 04/07/2014 à 10:08

Je sélectionne toujours de la colonne A à H sur la ligne de la cellule active, ici la ligne 5

Exemple

ferrand

Posté le 04/07/2014 à 11:18

Bonjour,

Sub SélecPlage()
Dim r&
r = ActiveCell.Row
Range(Cells(r, 1), Cells(r, 7)).Select
End Sub

A coller dans un module standard.

patton

Posté le 04/07/2014 à 11:46

Une fois lu c'est aussi simple que ça en a l'air.... encore faut-il savoir l'écrire

Merci!!!!!!!

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !

Les bons plans du moment PC Astuces

Tous les Bons Plans

29,99 €

Fire TV Stick 2020 à 29,99 €
Valable jusqu'au 26 Janvier

Amazon fait une promotion sur sa nouvelle clé HDMI Amazon Fire TV Stick qui passe à 29,99 € au lieu de 39,99 €. Cette clé HDMI à brancher sur votre TV possède un processeur quadricoeur, 1 Go de RAM et 8 Go d'espace de stockage, le WiFi et le bluetooth. Avec elle, vous allez pouvoir voir facilement Prime Video, Netflix, Disney+, YouTube, Molovov, MyCanal, Spotify sur votre TV Full HD. Cette nouvelle version 2020 est compatible Alexa. Une télécommande avec des boutons pour contrôler également la TV est fournie.

Notez qu'il est possible de coupler un casque bluetooth avec le Fire TV Stick afin de regarder tranquillement la TV sans déranger vos proches.

> Voir l'offre

39,99 €

Souris Logitech MX Anywhere 2 (Bluetooth, Unifying) à 39,99 €
Valable jusqu'au 24 Janvier

Amazon fait une promotion sur l'excellente souris sans fil Logitech MX Anywhere 2 qui passe à 39,99 € livrée gratuitement alors qu'on la trouve ailleurs à partir de 65 €. Cette souris que vous pourrez emporter partout avec votre PC ou Mac portable offre une double connectivité sans fil unify ou Bluetooth. Son capteur laser Dark field vous permettra de l'utiliser sur n'importe quelle surface. Elle est rechargeable via MicroUSB.

> Voir l'offre

79,99 €

Assistant vocal Amazon Echo Show 8 avec Alexa à 79,99 €
Valable jusqu'au 24 Janvier

Amazon fait une promotion sur l'assistant vocal Amazon Echo Show 8 qui passe à 79,99 € (au lieu de 129,99 €). L'appareil piloté par la voix et vos doigts fonctionne avec Alexa, l’intelligence artificielle développée par Amazon. Vous pourez avec elle écouter de la musique, interagir avec vos appareils domotiques, écouter les infos, des livres audio la radio, connaître la météo et d’accéder à des milliers d’autres possibilités grâce aux Skills : recettes de cuisine, petits jeux, etc. Grâce à son écran HD de 8 pouces, vous pourrez également regarder des séries, des films, des photos, afficher des recettes de cuisine, appeler vos amis en visio, contrôler vos caméras de sécurité, etc...

> Voir l'offre