Menu

Demande de code [Résolu]

luciano - 11 avril 2018 à 00:19 - Dernière réponse :  Luciano
- 13 avril 2018 à 15:47
Bonjour,
je me nome *** je travail sur Excel VBA et je voudrais faire le total de la somme reçue qui est sur la colonne C du classeur et je veux que cela s'additionne et s'affiche dans dans un textbox à l'ouverture du formulaire comment puis-je arriver?


Afficher la suite 

15 réponses

Répondre au sujet
jordane45 20526 Messages postés mercredi 22 octobre 2003Date d'inscriptionModérateurStatut 17 avril 2018 Dernière intervention - 11 avril 2018 à 00:32
0
Utile
5
Bonjour,

faire le total de la somme reçue qui est sur la colonne C

Dim somme
somme = Application.WorksheetFunction.Sum(Range("C1:C15"))



s'affiche dans dans un textbox

Userform1.TextBox1.value = somme

A l'ouverture d'une userform
Private Sub UserForm_Initialize()
	'Ici le code à lancer à l'initialisation de ta userform
End Sub		

https://silkyroad.developpez.com/VBA/UserForm/#LIV-A
merci pour la réponse mais le résultat ne donne que zéro dans le textbox lorsqu’on ajoute une nouvelle somme dans la colonne C
jordane45 20526 Messages postés mercredi 22 octobre 2003Date d'inscriptionModérateurStatut 17 avril 2018 Dernière intervention - 11 avril 2018 à 07:06
Tu as fais quoi au juste ?
J'ai des valeurs qui sont stockés dans une colonne précisément en c que je veux additionner à chaque fois qu'une nouvelle valeur s'ajoute et l'afficher dans un textbox d'un formulaire et voilà ce que j'ai fais je double clic sur le userform je choisi initialize et j'écris dim somme
Somme=application. Worksheetfunction.sum(range("C2:C1048576"))
Userform1.textbox1.value=somme
NB:toutes mes valeurs commence par C2
jordane45 20526 Messages postés mercredi 22 octobre 2003Date d'inscriptionModérateurStatut 17 avril 2018 Dernière intervention - 11 avril 2018 à 13:02
A textbox se nomme bien textbox 1?
Ne peux tu pas nous partager ton fichier ?
Oui je c'est un textbox1
Y'a pas de problème je vais vous envoyer cela merci
Commenter la réponse de jordane45
0
Utile
8
Vous avez reçu le fichier ?
toutes mes excuses, je n'avais pas compris comme ça mais je l'ai fait maintenant je demande si vous avez reçu merci
jordane45 20526 Messages postés mercredi 22 octobre 2003Date d'inscriptionModérateurStatut 17 avril 2018 Dernière intervention - 12 avril 2018 à 00:47
C'est un gag ? Une caméra cachée ???
Ça ne m'envoie rien ! TU DOIS COLLER LE LIEN ICI !!!!!
as tu enfin compris cette fois ??!!
https://www.cjoint.com/c/HDmbZkm68MU
jordane45 20526 Messages postés mercredi 22 octobre 2003Date d'inscriptionModérateurStatut 17 avril 2018 Dernière intervention > Luciano - 13 avril 2018 à 13:48
Tes nombres ne sont pas reconnus en tant que tel à cause des espaces qui s'y trouvent.
Tu dois reformater les valeurs de tes cellules avec de "vrais" nombres.
Pour comprendre.. tu n'as qu'a remplacer les valeurs actuelles par des chiffres du genre , (entre 0 et 9 ) et tu verras que ta macro fonctionne
merci pour le soutien j'ai essayé tout à l'heure ça marche que DIeu vous bénisse
Commenter la réponse de Luciano