je debute dans le vba et voici ce que j'essai de faire
j'ai créer mon objet avec un textbox pour la date et un combox pour
l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
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
Bidouille
Bonsoir Pour ma part, je recherche la dernière ligne vide (en partant du bas) Sheets("Feuil1").Range("A" & _ Range("A65536").End(xlUp).Row + 1) = UserForm.TextBox
En espérant avoir répondu à ton attente
"stef" a écrit dans le message de news: cnr6f5$d70$
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
Bonsoir
Pour ma part, je recherche la dernière ligne vide (en partant du bas)
Sheets("Feuil1").Range("A" & _
Range("A65536").End(xlUp).Row + 1) = UserForm.TextBox
En espérant avoir répondu à ton attente
"stef" <stef@tiscali.fr> a écrit dans le message de news:
cnr6f5$d70$1@news.tiscali.fr...
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire
j'ai créer mon objet avec un textbox pour la date et un combox pour
l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2
et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
Bonsoir Pour ma part, je recherche la dernière ligne vide (en partant du bas) Sheets("Feuil1").Range("A" & _ Range("A65536").End(xlUp).Row + 1) = UserForm.TextBox
En espérant avoir répondu à ton attente
"stef" a écrit dans le message de news: cnr6f5$d70$
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
Pierre Archambault
Salut Stef
Je travaille beaucoup avec les userforms
Pour ma part voici ma solution.
Crée un nom de plage ("Plage") dans ta feuille qui contiendra toutes les colonnes et toutes les lignes ou veux mettre tes données. Cependant, mets une ligne vide de plus. Pour ajouter des données à ta plage, initialise un compteur pour savoir sur quelle ligne de données ton pointeur se situe par exemple:
Dim NoRecord as Integer
NoRecord = 1 'Pour la première ligne de la plage qui en compte un minimum de deux.
Puis quand tu veux écrire le contenu de tes TextBox dans la plage, tu fais comme ceci:
Ajoute toujours une nouvelle ligne vide à la suite des nouvelles données: NoRecord = NoRecord +1 Range("Plage").Rows(NoRecord).Insert shift : = xlDown
Voilà
Bonne chance.
"stef" a écrit dans le message de news:cnr6f5$d70$
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
Salut Stef
Je travaille beaucoup avec les userforms
Pour ma part voici ma solution.
Crée un nom de plage ("Plage") dans ta feuille qui contiendra toutes les
colonnes et toutes les lignes ou veux mettre tes données. Cependant, mets
une ligne vide de plus.
Pour ajouter des données à ta plage, initialise un compteur pour savoir sur
quelle ligne de données ton pointeur se situe par exemple:
Dim NoRecord as Integer
NoRecord = 1 'Pour la première ligne de la plage qui en compte un
minimum de deux.
Puis quand tu veux écrire le contenu de tes TextBox dans la plage, tu fais
comme ceci:
Ajoute toujours une nouvelle ligne vide à la suite des nouvelles données:
NoRecord = NoRecord +1
Range("Plage").Rows(NoRecord).Insert shift : = xlDown
Voilà
Bonne chance.
"stef" <stef@tiscali.fr> a écrit dans le message de
news:cnr6f5$d70$1@news.tiscali.fr...
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire
j'ai créer mon objet avec un textbox pour la date et un combox pour
l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2
et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
Crée un nom de plage ("Plage") dans ta feuille qui contiendra toutes les colonnes et toutes les lignes ou veux mettre tes données. Cependant, mets une ligne vide de plus. Pour ajouter des données à ta plage, initialise un compteur pour savoir sur quelle ligne de données ton pointeur se situe par exemple:
Dim NoRecord as Integer
NoRecord = 1 'Pour la première ligne de la plage qui en compte un minimum de deux.
Puis quand tu veux écrire le contenu de tes TextBox dans la plage, tu fais comme ceci:
Ajoute toujours une nouvelle ligne vide à la suite des nouvelles données: NoRecord = NoRecord +1 Range("Plage").Rows(NoRecord).Insert shift : = xlDown
Voilà
Bonne chance.
"stef" a écrit dans le message de news:cnr6f5$d70$
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
Misange
Bonjour,
Tu trouveras sur excelabo rubrique débuter/fiches pas à pas/userforms un tutoriel pour répondre à ce genre de questions et également page xl/userforms et xl/controles deux pages avec de nombreuses astuces pour les userforms,avec des classeurs exemples à télécharger.
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
on 21/11/2004 23:56:
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
Bonjour,
Tu trouveras sur excelabo rubrique débuter/fiches pas à pas/userforms un
tutoriel pour répondre à ce genre de questions et également page
xl/userforms et xl/controles deux pages avec de nombreuses astuces pour
les userforms,avec des classeurs exemples à télécharger.
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
on 21/11/2004 23:56:
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire
j'ai créer mon objet avec un textbox pour la date et un combox pour
l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
Tu trouveras sur excelabo rubrique débuter/fiches pas à pas/userforms un tutoriel pour répondre à ce genre de questions et également page xl/userforms et xl/controles deux pages avec de nombreuses astuces pour les userforms,avec des classeurs exemples à télécharger.
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
on 21/11/2004 23:56:
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
stef
merci bidouille
cela fonctionne sur une feuille normal mais le souci c'est que mes cellules dans a ; b ; d ; e et f sont fusionner en 4 lignes et dans ce cas cela ne fonctionne pas. alors si tu a une autre idée je suis preneur
merci
"Bidouille" a écrit dans le message de news:41a12494$0$8175$
Bonsoir Pour ma part, je recherche la dernière ligne vide (en partant du bas) Sheets("Feuil1").Range("A" & _ Range("A65536").End(xlUp).Row + 1) = UserForm.TextBox
En espérant avoir répondu à ton attente
"stef" a écrit dans le message de news: cnr6f5$d70$
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
merci bidouille
cela fonctionne sur une feuille normal mais le souci c'est que mes cellules
dans a ; b ; d ; e et f sont fusionner en 4 lignes et dans ce cas cela ne
fonctionne pas.
alors si tu a une autre idée je suis preneur
merci
"Bidouille" <jaja.gire@wanadoo.fr> a écrit dans le message de
news:41a12494$0$8175$8fcfb975@news.wanadoo.fr...
Bonsoir
Pour ma part, je recherche la dernière ligne vide (en partant du bas)
Sheets("Feuil1").Range("A" & _
Range("A65536").End(xlUp).Row + 1) = UserForm.TextBox
En espérant avoir répondu à ton attente
"stef" <stef@tiscali.fr> a écrit dans le message de news:
cnr6f5$d70$1@news.tiscali.fr...
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire
j'ai créer mon objet avec un textbox pour la date et un combox pour
l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur
en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2
et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
cela fonctionne sur une feuille normal mais le souci c'est que mes cellules dans a ; b ; d ; e et f sont fusionner en 4 lignes et dans ce cas cela ne fonctionne pas. alors si tu a une autre idée je suis preneur
merci
"Bidouille" a écrit dans le message de news:41a12494$0$8175$
Bonsoir Pour ma part, je recherche la dernière ligne vide (en partant du bas) Sheets("Feuil1").Range("A" & _ Range("A65536").End(xlUp).Row + 1) = UserForm.TextBox
En espérant avoir répondu à ton attente
"stef" a écrit dans le message de news: cnr6f5$d70$
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
stef
excuse moi mais comme je l'est signaler je debute et la je ne comprend rien
merci tout de meme
"Pierre Archambault" a écrit dans le message de news:Yfaod.8449$
Salut Stef
Je travaille beaucoup avec les userforms
Pour ma part voici ma solution.
Crée un nom de plage ("Plage") dans ta feuille qui contiendra toutes les colonnes et toutes les lignes ou veux mettre tes données. Cependant, mets une ligne vide de plus. Pour ajouter des données à ta plage, initialise un compteur pour savoir sur
quelle ligne de données ton pointeur se situe par exemple:
Dim NoRecord as Integer
NoRecord = 1 'Pour la première ligne de la plage qui en compte un minimum de deux.
Puis quand tu veux écrire le contenu de tes TextBox dans la plage, tu fais comme ceci:
Ajoute toujours une nouvelle ligne vide à la suite des nouvelles données: NoRecord = NoRecord +1 Range("Plage").Rows(NoRecord).Insert shift : = xlDown
Voilà
Bonne chance.
"stef" a écrit dans le message de news:cnr6f5$d70$
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
excuse moi mais comme je l'est signaler je debute et la je ne comprend rien
merci tout de meme
"Pierre Archambault" <pierre.archambault@videotron.ca> a écrit dans le
message de news:Yfaod.8449$yx6.419183@weber.videotron.net...
Salut Stef
Je travaille beaucoup avec les userforms
Pour ma part voici ma solution.
Crée un nom de plage ("Plage") dans ta feuille qui contiendra toutes les
colonnes et toutes les lignes ou veux mettre tes données. Cependant, mets
une ligne vide de plus.
Pour ajouter des données à ta plage, initialise un compteur pour savoir
sur
quelle ligne de données ton pointeur se situe par exemple:
Dim NoRecord as Integer
NoRecord = 1 'Pour la première ligne de la plage qui en compte un
minimum de deux.
Puis quand tu veux écrire le contenu de tes TextBox dans la plage, tu fais
comme ceci:
Ajoute toujours une nouvelle ligne vide à la suite des nouvelles données:
NoRecord = NoRecord +1
Range("Plage").Rows(NoRecord).Insert shift : = xlDown
Voilà
Bonne chance.
"stef" <stef@tiscali.fr> a écrit dans le message de
news:cnr6f5$d70$1@news.tiscali.fr...
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire
j'ai créer mon objet avec un textbox pour la date et un combox pour
l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur
en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2
et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.
excuse moi mais comme je l'est signaler je debute et la je ne comprend rien
merci tout de meme
"Pierre Archambault" a écrit dans le message de news:Yfaod.8449$
Salut Stef
Je travaille beaucoup avec les userforms
Pour ma part voici ma solution.
Crée un nom de plage ("Plage") dans ta feuille qui contiendra toutes les colonnes et toutes les lignes ou veux mettre tes données. Cependant, mets une ligne vide de plus. Pour ajouter des données à ta plage, initialise un compteur pour savoir sur
quelle ligne de données ton pointeur se situe par exemple:
Dim NoRecord as Integer
NoRecord = 1 'Pour la première ligne de la plage qui en compte un minimum de deux.
Puis quand tu veux écrire le contenu de tes TextBox dans la plage, tu fais comme ceci:
Ajoute toujours une nouvelle ligne vide à la suite des nouvelles données: NoRecord = NoRecord +1 Range("Plage").Rows(NoRecord).Insert shift : = xlDown
Voilà
Bonne chance.
"stef" a écrit dans le message de news:cnr6f5$d70$
bonsoir a tous
je debute dans le vba et voici ce que j'essai de faire j'ai créer mon objet avec un textbox pour la date et un combox pour l'expediteur et je voudrait envoyer ces donner date en a1 et expediteur en
b1 sauf si a1 et b1 sont deja utiliser que cela soit envoyer en a2 et b2 et
ainsi de suite .
je vous remercie de toute l'aide que vous pourrez m'apporter.