Executer une Macro si cellule vide

Fermé

Ollerus Messages postés 2 Date d'inscription lundi 5 novembre 2018 Statut Membre Dernière intervention 6 novembre 2018 - 5 nov. 2018 à 15:52
Ollerus Messages postés 2 Date d'inscription lundi 5 novembre 2018 Statut Membre Dernière intervention 6 novembre 2018 - 6 nov. 2018 à 11:55

Bonjour,

Je viens vers vous pour m'aider à faire fonctionner une macro vba.

Je tente d'activer une commande par le biais d'un bouton contrôle formulaire (impossible d'utiliser activex car je suis sur mon lieu de travail et le service informatique a verrouillé pas mal de choses).

Je cherche donc en cliquant sur le bouton à générer un chiffre aléatoire compris entre 1 et 10 en cellule a1.
Pour cela j'utilise la formule suivante :

Sub bouton1_clic()
Randomize
Range ("a1"). Value = int (10*rnd)+1
End sub

Ce qui fonctionne, maintenant j'aimerais que le nombre générer aléatoirement ne le soit que si a1 est vide sinon j'aimerais que rien ne se passe.

Merci par avance de vos réponses et désolé pour les fautes.

A voir également:

Executer une Macro si cellule vide
Excel cellule couleur si condition texte - Guide
Aller à la ligne dans une cellule excel - Guide
Macro word - Guide
Macro logiciel - Télécharger - Organisation
Formate pour taxer client frigo vide ✓ - Forum Matériel & Système

1 réponse

Réponse 1 / 1

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
5 nov. 2018 à 16:36

Bonjour,

Sub bouton1_clic()
    If Range("A1") = "" Then
        Randomize
        Range("a1").Value = Int(10 * Rnd) + 1
    End If
End Sub

Ollerus Messages postés 2 Date d'inscription lundi 5 novembre 2018 Statut Membre Dernière intervention 6 novembre 2018
6 nov. 2018 à 11:55

Désolé de revenir si tard beaucoup de travail aujourd'hui.

Merci pour la rapidité de ta réponse et cela fonctionne très bien.

J'avais mis à peu près la même chose mais <> au lieu de = du coup cela faisait l'effet inverse.

Discussions similaires

Comment faire le symbole coeur vide/coeur blanc

le frigo ne marche pas....

Excel si cellule contient texte alors...

programme qui n'affiche pas le mot secret

Formule Excel : "SI" une cellule contient un mot, alors ?

Discussions similaires

Newsletters