Userform

Fermé

blalaa Messages postés 167 Date d'inscription mercredi 18 avril 2018 Statut Membre Dernière intervention 24 mars 2020 - Modifié le 23 mai 2018 à 12:19
blalaa Messages postés 167 Date d'inscription mercredi 18 avril 2018 Statut Membre Dernière intervention 24 mars 2020 - 24 mai 2018 à 09:18

Bonjour,

j'ai crée un userform par vba et dans cet userform il y a un bouton

ce que je veux c'est quand je clique sur le bouton il me fait les opération suivante

Range("s7") = Range("q49")
ca veut dire stoker la valeur qui se trouve dans rang("q49") dans rang("s7")

et quand je reclique une autre fois il me fait l'operation suivante

Range("s8") = Range("q49")-range("s7")
stoker la soustraction de Range("q49")-range("s7") dans rang("s8")

et quand je reclique une autre fois il me fait l'operation suivante
Range("s9") = Range("q49")-range("s8")
stoker la soustraction de Range("q49")-range("s8") dans rang("s9")
.
.
.

ainsi de suite

sachant que range("q49") prend des valeurs variables

le probleme est a chaque fois rang(s7) prend la nouvelle valeur de rang(q49) et c'est logique puisque j'ai mis
Range("s7") = Range("q49")
mais je ne veux pas quil prend la nouvelle valeur de rang("q49")

je ne sais pas si il ya une autre methode ou non

ou bien un code qui me laisse la valeur dans rang("s7") fixe

je vous remercie par avence

A voir également:

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 701
23 mai 2018 à 13:28

Bonjour,

Range("s7") = Range("q49")

Doit se faire quand: a chaque ouverture de l'UF et clic sur le bouton ou ....... ???????

blalaa Messages postés 167 Date d'inscription mercredi 18 avril 2018 Statut Membre Dernière intervention 24 mars 2020
23 mai 2018 à 14:43

bonjour

oui a chaque clique sur un bouton

blalaa Messages postés 167 Date d'inscription mercredi 18 avril 2018 Statut Membre Dernière intervention 24 mars 2020
23 mai 2018 à 14:49

sil vous plait

j'ai mis le code qui ma donne Jordane45 :

Private Sub CommandButton1_Click()
i = Sheets("Feuil1").Cells.Find("*", Range("A1"), , , xlByRows, xlPrevious).Row 'retourne la dernière ligne non vide de la feuille Feuil1

valDerniereCel = Sheets("Feuil1").Cells(i, 14)
Range("a1") = Cells(i, 14)

End Sub

mais ca marche sur mon tableau
je ne comprend pas ! sur dautre tableu ca marche mais sur mon tableau ca marche pas

voici le tableu dexcel

blalaa Messages postés 167 Date d'inscription mercredi 18 avril 2018 Statut Membre Dernière intervention 24 mars 2020
23 mai 2018 à 15:05

je crois que je sais ou est le probleme

c est que
les lignes de mon tableau sont tous remplis ,exemple de ligne 7 jusque ligne 14 sont remplis
et toute les coulonne de 3 jusque 13 sont remplis apres de 15 a 17 sont remplis
mais la colonne de 14 ne sont pas toute remplis ( cells(10,14) et cells(12,14) sont pas remplis

sachant que moi je veux recuperer la vaaleur de cells(12,14), puisque c la derniere cellule non vide meme si les autres colonnes de la ligne 12 sont remplis

alors est ce que il ya un moyen de recuperer la valeur de cette derniere cellule

merci

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
23 mai 2018 à 16:29

Re,
Petit probleme d'incoherence:
( cells(10,14) et cells(12,14) sont pas remplis
et
je veux recuperer la vaaleur de cells(12,14), puisque c la derniere cellule non vide

blalaa Messages postés 167 Date d'inscription mercredi 18 avril 2018 Statut Membre Dernière intervention 24 mars 2020
23 mai 2018 à 17:06

pardon
je voulais ecrire la valeur de cells(11,14)
ca veut dire je veux recuperer la valeur de cells( 11,14)

Discussions similaires

Userform, bouton, excel

Liste déroulant dans Userform Via liste Excel

vba sur excel- récupérer valeur d'un userform

EXCEL MAC Création d'un USERFORM

Comment afficher le contenue d'une feuille excel userform Vba

Discussions similaires

Newsletters