Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Encore besoin d'aide !!!

  • Initiateur de la discussion Initiateur de la discussion inesis member
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

I

inesis member

Guest
Re bonjour à tout le forum,

Mes connaissances en VBA étant limitées, ej vous sollicite de nouveau pour aboutir mon fichier.

J'ai réussi à piocher plein d'infos sur les différents posts mais je n'ai pas trouver le moyen de terminer ce que je cherche à faire.

Dans un USF, je souhaite envoyer les saisies de 2 textbox dans une feuille sélectionnée (ça j'ai trouvé sur le forum)
Ce que je n'ai pas trouvé, c'est que je souhaite choisir la feuille de destination grâce à une listbox se trouvant dans l'USF.

Et dernier point, je souhaite que les données saisies (2 colonnes) soient triées par ordre croissant dans la 1ère colonne

Voici le fichier, j'espère que vous pourrez m'aider

Merci encore
 

Pièces jointes

Re : Encore besoin d'aide !!!

Bonjour à tous les 2,

Etant au boulot, je ne peux télécharger de fichiers .zip
Je regarde ce soir et vous tiens informer.
En tout cas, merci de vos réponses rapides
 
Re : Encore besoin d'aide !!!

Salut inesis member
Bonjour le fil
Bonjour le Forum

en pièce jointe une première approche

Le Fichier :Regarde la pièce jointe 90750

Bonne journée

Merci Chti 160, l'approche est effectivement très bonne mais la version de notre ami Shimon 810 se rapproche plus de ce que je souhaite.
Il y a cependant un point sur lequel vous êtes encore tous les 2 en callenge, c'est sur le tri croissant automatique des données de la feuille contenant les nouvelles références... si tu as des idées...
En tout cas, merci encore de ton aide

IM

Bonjour,

Vois si celà fonctionne.

Simon

C'est Nickel comme je veux, j'ai copié le code pour le bouton "suivant" et c'est exactement ce que je voulais.
Comme je l'ai dis à Chti160, il ne manque que le tri automatique à la fin de la saisie, si tu as des idées!
Merci encore à vous 2 !

IM
 
Re : Encore besoin d'aide !!!

Salut inesis member
Bonsoir le Fil
Bonsoir le Forum

vite fait
dans ma version on supprime une feuille (Pas forcé)
je ne comprends pas ta demande ,dans cette version voir ci dessous
Code:
Function miseajour(ByVal sht As String)

With Sheets(sht)
[COLOR=Green]'ici on détermine la dernière la ligne vide [/COLOR]
DerLgn = .Range("A65536").End(xlUp).Row + 1
         .Cells(DerLgn, 1) = newref.prix.Value[COLOR=Green] 'ici on colle le Prix[/COLOR]
         .Cells(DerLgn, 2) = newref.référence.Value [COLOR=Green]'ici la référence[/COLOR]
[COLOR=Green]'et la je trie la plage en fonction de la collonne 1[/COLOR]
         .Range(.Cells(2, 1), .Cells(DerLgn, 2)).Sort Key1:=.Range("A2") 
End With

End Function
Bonne fin de Soirée
 
Dernière édition:
Re : Encore besoin d'aide !!!


C nickel, exactement ce que je voulais.
Merci encore !
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

V
Réponses
9
Affichages
1 K
Valoops
V
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…