Listbox ligne choisi
Résolu/Fermé
luhotbeer
Messages postés
8
Date d'inscription
jeudi 22 janvier 2015
Statut
Membre
Dernière intervention
22 février 2015
-
4 févr. 2015 à 20:46
Maurice - 7 févr. 2015 à 17:47
Maurice - 7 févr. 2015 à 17:47
A voir également:
- Listbox ligne choisi
- Aller à la ligne excel - Guide
- Site de vente en ligne particulier - Guide
- Partager photos en ligne - Guide
- Apparaitre hors ligne instagram - Guide
- Gps hors ligne - Guide
12 réponses
via55
Messages postés
14496
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
22 novembre 2024
2 735
4 févr. 2015 à 22:10
4 févr. 2015 à 22:10
Bonsoir
1) Les cellules fusionnées et les macros ne font pas bon ménage ! Les éviter comme la peste ! Mais bon on va faire avec....
2) donc en premier lieu fusionner les cellules C16 à J16 du titre Description pour qu'elles soient dans la même configuration que celles du dessous
3) Ensuite modifier la partie de la macro associée au bouton de l'userform ainsi :
Ne pas oublier de déclarer la variable en début de macro : Dim dlig as long
Cdlmnt
1) Les cellules fusionnées et les macros ne font pas bon ménage ! Les éviter comme la peste ! Mais bon on va faire avec....
2) donc en premier lieu fusionner les cellules C16 à J16 du titre Description pour qu'elles soient dans la même configuration que celles du dessous
3) Ensuite modifier la partie de la macro associée au bouton de l'userform ainsi :
For i = 2 To Sheets("Pièces").Range("B65536").End(xlUp).Row If Trim(Str(Sheets("Pièces").Range("A" & i))) = nuclient Then dlig = Sheets("Facture").Range("C34").End(xlUp).Row + 1 If dlig = 17 And Sheets("Facture").Range("C17") <> "" Then MsgBox ("IMPOSSIBLE, plus de ligne disponible") Sheets("Facture").Range("C" & dlig) = Sheets("Pièces").Range("B" & i) Sheets("Facture").Range("K" & dlig) = Sheets("Pièces").Range("D" & i) Exit For End Iff
Ne pas oublier de déclarer la variable en début de macro : Dim dlig as long
Cdlmnt
Bonjour
J'ais fait un UserForm et modifier la facture
A toi de tester si ca te va
http://cjoint.com/?3BewAmlN5XI
A+
Maurice
J'ais fait un UserForm et modifier la facture
A toi de tester si ca te va
http://cjoint.com/?3BewAmlN5XI
A+
Maurice
luhotbeer
Messages postés
8
Date d'inscription
jeudi 22 janvier 2015
Statut
Membre
Dernière intervention
22 février 2015
4 févr. 2015 à 22:32
4 févr. 2015 à 22:32
bonjour Maurice,
c'est très bien, un gros merci j'en espérait pas autant.
une grosse épine est parti de mon pied, lol
merci.
c'est très bien, un gros merci j'en espérait pas autant.
une grosse épine est parti de mon pied, lol
merci.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
luhotbeer
Messages postés
8
Date d'inscription
jeudi 22 janvier 2015
Statut
Membre
Dernière intervention
22 février 2015
5 févr. 2015 à 21:57
5 févr. 2015 à 21:57
bonjour!
le dernier fichier que tu as envoyer est malade, lol. c'est surement une erreur, et je ne sais pas ce que tu voulais rajouter de plus dans la modife.
curiosité oblige!
a+
le dernier fichier que tu as envoyer est malade, lol. c'est surement une erreur, et je ne sais pas ce que tu voulais rajouter de plus dans la modife.
curiosité oblige!
a+
Bonjour
je joue avec ton fichier desolée
en voila un autre
http://cjoint.com/?3BfwrzBiRZr
A+
Maurice
je joue avec ton fichier desolée
en voila un autre
http://cjoint.com/?3BfwrzBiRZr
A+
Maurice
luhotbeer
Messages postés
8
Date d'inscription
jeudi 22 janvier 2015
Statut
Membre
Dernière intervention
22 février 2015
6 févr. 2015 à 15:08
6 févr. 2015 à 15:08
Bonjour Maurice!
Tu n'as pas à être désolée de jouer avec mon fichier, lol .Je vois que tu as modifié beaucoup
les codes archaïques qu'il contenait. Je n'ai vraiment pas de problème avec ça.
Une chose que j'ai remarqué, c'est que quand j'avais mis la date (aujourd'hui en code) bien quand j'enregistre la facture, si j'ouvre cette facture sauvegarder bien la date se met à jour de la journée actuelle, elle ne garde pas la date quelle a été faite.
J'ai une question, est 'il possible d'enregistrer aussi dans le même dossier en format.PDF?
Présentement cela fonctionne bien, ?
a+
Tu n'as pas à être désolée de jouer avec mon fichier, lol .Je vois que tu as modifié beaucoup
les codes archaïques qu'il contenait. Je n'ai vraiment pas de problème avec ça.
Une chose que j'ai remarqué, c'est que quand j'avais mis la date (aujourd'hui en code) bien quand j'enregistre la facture, si j'ouvre cette facture sauvegarder bien la date se met à jour de la journée actuelle, elle ne garde pas la date quelle a été faite.
J'ai une question, est 'il possible d'enregistrer aussi dans le même dossier en format.PDF?
Présentement cela fonctionne bien, ?
a+
Bonjour
oui on peux le faire
voila un macro qui qui fonctionne a partir de Excel 2007
avec la date edition
A+
Maurice
oui on peux le faire
voila un macro qui qui fonctionne a partir de Excel 2007
avec la date edition
Sub Edite_pdf() Range("K9").Value = DateValue(Now) ActiveSheet.PageSetup.PrintArea = "$B$8:$L$55" NonFiche = "Fact" & Format(Range("K10").Value, "00000") Repertoire = ThisWorkbook.Path & "\" Chemin = Repertoire & NonFiche & ".pdf" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ Chemin, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ False End Sub
A+
Maurice
luhotbeer
Messages postés
8
Date d'inscription
jeudi 22 janvier 2015
Statut
Membre
Dernière intervention
22 février 2015
6 févr. 2015 à 19:59
6 févr. 2015 à 19:59
bonjours!
le code fonctionne pas comme il faut, il ne prend pas la numérotation de la facture, autrement dit il s'écrase par dessus a chaque enregistrement.
a+
le code fonctionne pas comme il faut, il ne prend pas la numérotation de la facture, autrement dit il s'écrase par dessus a chaque enregistrement.
a+
luhotbeer
Messages postés
8
Date d'inscription
jeudi 22 janvier 2015
Statut
Membre
Dernière intervention
22 février 2015
7 févr. 2015 à 15:56
7 févr. 2015 à 15:56
bonjour!
voici le lien du fichier.
https://www.dropbox.com/s/x7vfa23zmn5ciyg/FACTURE%20-%20Copie.xlsm?dl=0
a+
voici le lien du fichier.
https://www.dropbox.com/s/x7vfa23zmn5ciyg/FACTURE%20-%20Copie.xlsm?dl=0
a+