Signaler

Inputbox et somme [Résolu]

Posez votre question freeycap 58Messages postés lundi 27 octobre 2014Date d'inscription 23 novembre 2016 Dernière intervention - Dernière réponse le 23 nov. 2016 à 18:00
Bonjour,
J'ai 2 questions :
1 : J'ai un Private Sub CommandButton2 sur ma Feuil1 qui doit ouvrir un Inputbox pour saisir le nom d'un groupe de formation.
Lorsque je clique OK, j'essaie de copier la valeur du Nom de la formation que j'ai saisi dans mon Inputbox dans la cellule B8 de ma feuille1.
Alors, voici mon code pour ça :
Private Sub CommandButton2_Click()
Dim Nom as String
Nom = Inputbox("Entrer le nom de la Formation", "Nom de la Formation")
Cells("B8") = Nom
End sub
C'est mettre le nom de la formation dans ma cellule qui ne marche pas...
2 : Toujours pour mon même projet : Sur ma Feuil1, dans les cellules de B50 à B70, j'ai la liste de mes élèves qui sont rentrés via un userform.
Sur ma cellule B40, je veux nombre total de mes élèves...
J'ai trouvé ça comme code, mais ça ne marche pas... Je n'ai pas compris comment coder une somme... :
Private Sub Initialize()
'Pour saisir le nombre total des apprenants de la cohorte
Cells(40, 2).Value = CountA(Feuil1.Range("B50;B69"))
End Sub
Ben ca marche pas... et je suis bien embêté...
Merci d'avance pour l'aide
Y.
Afficher la suite 
Utile
+1
moins plus
Exact! excuse moi

Application.CountA(Feuil1.Range("B50:B69"))
Ajouter un commentaire
Utile
+0
moins plus
Bonjour
Range("B8") = Nom
au lieu de cells("B8")
(syntaxe cells= cells(8,"B") )

Cells(40, 2) = CountA(Feuil1.Range("B50:B69"))

au lieu de
Cells(40, 2).Value = CountA(Feuil1.Range("B50;B69"))

Ajouter un commentaire
Utile
+0
moins plus
Salut Michel,

Merci pour ton aide.
D'abord, c'est parfait pour la première question, ca marche 100%.

Par contre, le deuxieme code ne marche toujours pas.
Le CountA est en Erreur de Compilation 'Sub ou fonction' non définie...

J'en suis là :

Private Sub Initialize()

'Pour saisir le nombre total des apprenants de la cohorte
Cells(40, 2) = CountA(Feuil1.Range("B50:B69"))


End Sub

Et ça bloque...
Ajouter un commentaire
Utile
+0
moins plus
et ben voilà... ca marche parfaitement...

Merci Michel
Ajouter un commentaire

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !