bonjour toute et tous
je me suis fait une petit programe de facture qui fonctionne pas trop mal
sauf que quand je fais une facture clic bout nouv fact jai un userform qui
me permet d'introduire le client il se ferme sur (ok) et s'ouvre un autre
userform pour les articles su celui ci 2 bouts (article suivant ) et (fin de
facture) do loop
si je clic sur fin de facture elle enregistre le nom du client le total sur
une ligne d'une autre feuille(jusque la ca va)
mais admetons que je me suis trompé j'ai mis un bout annuler mais rien ne
vas je dois annuler en clic sur fin de fact ce qui est embetant car je dois
aller effacer dans l'autre feuille
quelqu'un a t'il une petit soluc pour moi
merci bien
un extrait du code
num = 1
fin = 0
'boucle principale
Do While fin = 0
Load art
la suite
Sheets("boncom").Select
Range("a" & ligneorigine).Offset(num, 0).Value = num
Range("a" & ligneorigine).Offset(num, 1).Value = des
Range("a" & ligneorigine).Offset(num, 5).Value = pu
Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00?"
Range("a" & ligneorigine).Offset(num, 6).Value = qte
Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00"
Range("a" & ligneorigine).Offset(num, 7).Formula = "=f" & 15 + num & "*g" &
15 + num
Range("a" & ligneorigine).Offset(num, 7).NumberFormat = "#,##0.00?"
num = num + 1
Loop
le reste ces les formule de calcul et les format et enregistrement
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pascal Engelmajer
-- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel "michel" a écrit dans le message de news: 40160fa8$0$7041$
bonjour toute et tous je me suis fait une petit programe de facture qui fonctionne pas trop mal sauf que quand je fais une facture clic bout nouv fact jai un userform qui me permet d'introduire le client il se ferme sur (ok) et s'ouvre un autre userform pour les articles su celui ci 2 bouts (article suivant ) et (fin de
facture) do loop si je clic sur fin de facture elle enregistre le nom du client le total sur
une ligne d'une autre feuille(jusque la ca va) mais admetons que je me suis trompé j'ai mis un bout annuler mais rien ne vas je dois annuler en clic sur fin de fact ce qui est embetant car je dois
aller effacer dans l'autre feuille
quelqu'un a t'il une petit soluc pour moi merci bien un extrait du code
num = 1 fin = 0 'boucle principale Do While fin = 0 Load art la suite Sheets("boncom").Select Range("a" & ligneorigine).Offset(num, 0).Value = num Range("a" & ligneorigine).Offset(num, 1).Value = des Range("a" & ligneorigine).Offset(num, 5).Value = pu Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00?" Range("a" & ligneorigine).Offset(num, 6).Value = qte Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00" Range("a" & ligneorigine).Offset(num, 7).Formula = "=f" & 15 + num & "*g" &
15 + num Range("a" & ligneorigine).Offset(num, 7).NumberFormat = "#,##0.00?" num = num + 1 Loop
le reste ces les formule de calcul et les format et enregistrement
merci
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
"michel" <angopasca@synet.be> a écrit dans le message de news:
40160fa8$0$7041$ba620e4c@news.skynet.be...
bonjour toute et tous
je me suis fait une petit programe de facture qui fonctionne pas trop mal
sauf que quand je fais une facture clic bout nouv fact jai un userform qui
me permet d'introduire le client il se ferme sur (ok) et s'ouvre un autre
userform pour les articles su celui ci 2 bouts (article suivant ) et (fin
de
facture) do loop
si je clic sur fin de facture elle enregistre le nom du client le total
sur
une ligne d'une autre feuille(jusque la ca va)
mais admetons que je me suis trompé j'ai mis un bout annuler mais rien ne
vas je dois annuler en clic sur fin de fact ce qui est embetant car je
dois
aller effacer dans l'autre feuille
quelqu'un a t'il une petit soluc pour moi
merci bien
un extrait du code
num = 1
fin = 0
'boucle principale
Do While fin = 0
Load art
la suite
Sheets("boncom").Select
Range("a" & ligneorigine).Offset(num, 0).Value = num
Range("a" & ligneorigine).Offset(num, 1).Value = des
Range("a" & ligneorigine).Offset(num, 5).Value = pu
Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00?"
Range("a" & ligneorigine).Offset(num, 6).Value = qte
Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00"
Range("a" & ligneorigine).Offset(num, 7).Formula = "=f" & 15 + num & "*g"
&
15 + num
Range("a" & ligneorigine).Offset(num, 7).NumberFormat = "#,##0.00?"
num = num + 1
Loop
le reste ces les formule de calcul et les format et enregistrement
-- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel "michel" a écrit dans le message de news: 40160fa8$0$7041$
bonjour toute et tous je me suis fait une petit programe de facture qui fonctionne pas trop mal sauf que quand je fais une facture clic bout nouv fact jai un userform qui me permet d'introduire le client il se ferme sur (ok) et s'ouvre un autre userform pour les articles su celui ci 2 bouts (article suivant ) et (fin de
facture) do loop si je clic sur fin de facture elle enregistre le nom du client le total sur
une ligne d'une autre feuille(jusque la ca va) mais admetons que je me suis trompé j'ai mis un bout annuler mais rien ne vas je dois annuler en clic sur fin de fact ce qui est embetant car je dois
aller effacer dans l'autre feuille
quelqu'un a t'il une petit soluc pour moi merci bien un extrait du code
num = 1 fin = 0 'boucle principale Do While fin = 0 Load art la suite Sheets("boncom").Select Range("a" & ligneorigine).Offset(num, 0).Value = num Range("a" & ligneorigine).Offset(num, 1).Value = des Range("a" & ligneorigine).Offset(num, 5).Value = pu Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00?" Range("a" & ligneorigine).Offset(num, 6).Value = qte Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00" Range("a" & ligneorigine).Offset(num, 7).Formula = "=f" & 15 + num & "*g" &
15 + num Range("a" & ligneorigine).Offset(num, 7).NumberFormat = "#,##0.00?" num = num + 1 Loop
le reste ces les formule de calcul et les format et enregistrement
merci
Pascal Engelmajer
Salut, pas d'autres solution que de défaire ce qui a été fait ! -- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel "michel" a écrit dans le message de news: 40160fa8$0$7041$
bonjour toute et tous je me suis fait une petit programe de facture qui fonctionne pas trop mal sauf que quand je fais une facture clic bout nouv fact jai un userform qui me permet d'introduire le client il se ferme sur (ok) et s'ouvre un autre userform pour les articles su celui ci 2 bouts (article suivant ) et (fin de
facture) do loop si je clic sur fin de facture elle enregistre le nom du client le total sur
une ligne d'une autre feuille(jusque la ca va) mais admetons que je me suis trompé j'ai mis un bout annuler mais rien ne vas je dois annuler en clic sur fin de fact ce qui est embetant car je dois
aller effacer dans l'autre feuille
quelqu'un a t'il une petit soluc pour moi merci bien un extrait du code
num = 1 fin = 0 'boucle principale Do While fin = 0 Load art la suite Sheets("boncom").Select Range("a" & ligneorigine).Offset(num, 0).Value = num Range("a" & ligneorigine).Offset(num, 1).Value = des Range("a" & ligneorigine).Offset(num, 5).Value = pu Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00?" Range("a" & ligneorigine).Offset(num, 6).Value = qte Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00" Range("a" & ligneorigine).Offset(num, 7).Formula = "=f" & 15 + num & "*g" &
15 + num Range("a" & ligneorigine).Offset(num, 7).NumberFormat = "#,##0.00?" num = num + 1 Loop
le reste ces les formule de calcul et les format et enregistrement
merci
Salut,
pas d'autres solution que de défaire ce qui a été fait !
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
"michel" <angopasca@synet.be> a écrit dans le message de news:
40160fa8$0$7041$ba620e4c@news.skynet.be...
bonjour toute et tous
je me suis fait une petit programe de facture qui fonctionne pas trop mal
sauf que quand je fais une facture clic bout nouv fact jai un userform qui
me permet d'introduire le client il se ferme sur (ok) et s'ouvre un autre
userform pour les articles su celui ci 2 bouts (article suivant ) et (fin
de
facture) do loop
si je clic sur fin de facture elle enregistre le nom du client le total
sur
une ligne d'une autre feuille(jusque la ca va)
mais admetons que je me suis trompé j'ai mis un bout annuler mais rien ne
vas je dois annuler en clic sur fin de fact ce qui est embetant car je
dois
aller effacer dans l'autre feuille
quelqu'un a t'il une petit soluc pour moi
merci bien
un extrait du code
num = 1
fin = 0
'boucle principale
Do While fin = 0
Load art
la suite
Sheets("boncom").Select
Range("a" & ligneorigine).Offset(num, 0).Value = num
Range("a" & ligneorigine).Offset(num, 1).Value = des
Range("a" & ligneorigine).Offset(num, 5).Value = pu
Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00?"
Range("a" & ligneorigine).Offset(num, 6).Value = qte
Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00"
Range("a" & ligneorigine).Offset(num, 7).Formula = "=f" & 15 + num & "*g"
&
15 + num
Range("a" & ligneorigine).Offset(num, 7).NumberFormat = "#,##0.00?"
num = num + 1
Loop
le reste ces les formule de calcul et les format et enregistrement
Salut, pas d'autres solution que de défaire ce qui a été fait ! -- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel "michel" a écrit dans le message de news: 40160fa8$0$7041$
bonjour toute et tous je me suis fait une petit programe de facture qui fonctionne pas trop mal sauf que quand je fais une facture clic bout nouv fact jai un userform qui me permet d'introduire le client il se ferme sur (ok) et s'ouvre un autre userform pour les articles su celui ci 2 bouts (article suivant ) et (fin de
facture) do loop si je clic sur fin de facture elle enregistre le nom du client le total sur
une ligne d'une autre feuille(jusque la ca va) mais admetons que je me suis trompé j'ai mis un bout annuler mais rien ne vas je dois annuler en clic sur fin de fact ce qui est embetant car je dois
aller effacer dans l'autre feuille
quelqu'un a t'il une petit soluc pour moi merci bien un extrait du code
num = 1 fin = 0 'boucle principale Do While fin = 0 Load art la suite Sheets("boncom").Select Range("a" & ligneorigine).Offset(num, 0).Value = num Range("a" & ligneorigine).Offset(num, 1).Value = des Range("a" & ligneorigine).Offset(num, 5).Value = pu Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00?" Range("a" & ligneorigine).Offset(num, 6).Value = qte Range("a" & ligneorigine).Offset(num, 5).NumberFormat = "#,##0.00" Range("a" & ligneorigine).Offset(num, 7).Formula = "=f" & 15 + num & "*g" &
15 + num Range("a" & ligneorigine).Offset(num, 7).NumberFormat = "#,##0.00?" num = num + 1 Loop
le reste ces les formule de calcul et les format et enregistrement
