Exercice macro en VBA

2301 -
lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention - 16 juin 2010 à 15:16

Bonjour,

Je suis débutante un VBA et je souhaite créer deux macros:
- La 1ère me permettrait de calculer le nombre de cellules non vide d'une sélection
et d'afficher le résultat d'une boite de dialogue.

- Pour la seconde, je souhaiterais pouvoir créer une macro qui permettant de rechercher un mot saisi dans le cellule A1,dans une sélection de cellule contenant des chaines et d'afficher dans une boite de message l'adresse de la cellule contenant le mot récherché..

Comment faire ?

Est-ce possible ? Et comment faire ?

Je remercie d'avance celui(ceux) qui m'eclairera(ont) sur ces points! Je ne maîtrise pas encore VBA et les macros pour m'en sortir seule et je patauge bien, malgré les aides que l'on peut trouver en ligne!!!
Encore merci!

A voir également:

Exercice macro en VBA
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Jitbit macro recorder - Télécharger - Confidentialité
Macro word - Guide
Excel compter cellule couleur sans vba - Guide

1 réponse

Réponse 1 / 1

lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention 1 191

Re,
J'ai répondu sur ton autre poste pour ton premier problème.. enfin quoi qu'il en soit, tu met deux boutons sur la feuille et tu colle les codes suivants...

Private Sub CommandButton1_Click()  
Dim Cel As Range, Compt As Long  
    For Each Cel In Selection  
        If Cel <> "" Then Compt = Compt + 1  
    Next  
    MsgBox "Cellule non vide dans la sélection = " & Compt  
End Sub  

Private Sub CommandButton2_Click()  
Dim Cel As Range  
    For Each Cel In Selection  
        If Cel.Value Like "*" & Range("A1").Value & "*" Then  
            Cel.Activate  
            
            Exit Sub  
        End If  
    Next  
End Sub

Pour la deuxième j'ai pas mis de message mais sélectionner directement la cellule, mais si tu veux tu peu mettre une message
A+

L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cogne à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

Arrêt d'exécution d'un code vba

recup couleur de cellule sans macro

Votre réponse

Discussions similaires