Remplir a partir de la 1ere cellule vide :
Résolu
cyrga11
Messages postés
48
Date d'inscription
Statut
Membre
Dernière intervention
-
cyrga11 Messages postés 48 Date d'inscription Statut Membre Dernière intervention -
cyrga11 Messages postés 48 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'aurai besoin de votre aide. Je vous explique mon problème.
J'ai 26 boutons correspondant a chaque lettre de l'alphabet.
Ma zone a remplir se trouve en : A5:L5
Je souhaiterais qu'en cliquant sur un des 26 boutons, la lettre correspondante aille se mettre dans la première case vide de la plage : A5:L5.
Ensuite, le souhaiterais que chaque bouton sur lequel je clique remplisse les cases vierges suivante dans l'ordre.
Est-ce possible ?
Merci d'avance à tout le monde :)
J'aurai besoin de votre aide. Je vous explique mon problème.
J'ai 26 boutons correspondant a chaque lettre de l'alphabet.
Ma zone a remplir se trouve en : A5:L5
Je souhaiterais qu'en cliquant sur un des 26 boutons, la lettre correspondante aille se mettre dans la première case vide de la plage : A5:L5.
Ensuite, le souhaiterais que chaque bouton sur lequel je clique remplisse les cases vierges suivante dans l'ordre.
Est-ce possible ?
Merci d'avance à tout le monde :)
A voir également:
- Remplir a partir de la 1ere cellule vide :
- Creer un groupe whatsapp a partir d'un autre groupe - Guide
- Supprimer page word vide - Guide
- Aller à la ligne dans une cellule excel - Guide
- Chaque fichier en ligne sur le web a un chemin d’accès sur un serveur. c’est le cas du fichier du logo présent sur la page de cette ville. quel est le chemin de ce fichier à partir de la racine du site ? - Forum Graphisme
- Combien y a-t-il de bateaux dans la zone de 475 pixels de large et 1000 pixels de haut à partir du coin supérieur gauche de cette image ? - Forum Photoshop
3 réponses
Bonsoir,
[L5].End(xlToLeft)(1, 2).Select
ou
Range("L5").End(xlToLeft)(1, 2).Select
ou encore
Range("L5").End(xlToLeft).Offset(0, 1).Select
ensuite il faudrait savoir comment tu as renseigné ton bouton, si tu as mis A sur le bouton par exemple
Private Sub CommandButton1_Click()
Range("L5").End(xlToLeft).Offset(0, 1) = CommandButton1.Caption
End Sub
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
[L5].End(xlToLeft)(1, 2).Select
ou
Range("L5").End(xlToLeft)(1, 2).Select
ou encore
Range("L5").End(xlToLeft).Offset(0, 1).Select
ensuite il faudrait savoir comment tu as renseigné ton bouton, si tu as mis A sur le bouton par exemple
Private Sub CommandButton1_Click()
Range("L5").End(xlToLeft).Offset(0, 1) = CommandButton1.Caption
End Sub
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
