Bonjour,=20
Est-il possible de se servir d'un seul USF pour plusieurs=20
feuille en sachant que toutes les feuilles sont format=E9es=20
de la m=EAme fa=E7on.
Exemple: je doit rentrer des donn=E9es dans une feuille=20
Date, N=B0, Du, Au, Montant comment faire pour me servir du=20
m=EAme usf pour toutes les feuilles celle-ci vont de=20
Janvier =E0 Decembre.
Merci de votre aide
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
garnote
Salut Sten,
«je doit rentrer des données dans une feuille» ???
Peut-être que :
Private Sub TextBox1_Change() For Each feuille In ActiveWorkbook.Worksheets feuille.[a1] = TextBox1 Next End Sub
Serge
"STEN" a écrit dans le message de news: 28e001c42847$c98da9b0$ Bonjour, Est-il possible de se servir d'un seul USF pour plusieurs feuille en sachant que toutes les feuilles sont formatées de la même façon. Exemple: je doit rentrer des données dans une feuille Date, N°, Du, Au, Montant comment faire pour me servir du même usf pour toutes les feuilles celle-ci vont de Janvier à Decembre. Merci de votre aide
Salut Sten,
«je doit rentrer des données dans une feuille» ???
Peut-être que :
Private Sub TextBox1_Change()
For Each feuille In ActiveWorkbook.Worksheets
feuille.[a1] = TextBox1
Next
End Sub
Serge
"STEN" <jsterjean@aol.com> a écrit dans le message de news:
28e001c42847$c98da9b0$a601280a@phx.gbl...
Bonjour,
Est-il possible de se servir d'un seul USF pour plusieurs
feuille en sachant que toutes les feuilles sont formatées
de la même façon.
Exemple: je doit rentrer des données dans une feuille
Date, N°, Du, Au, Montant comment faire pour me servir du
même usf pour toutes les feuilles celle-ci vont de
Janvier à Decembre.
Merci de votre aide
«je doit rentrer des données dans une feuille» ???
Peut-être que :
Private Sub TextBox1_Change() For Each feuille In ActiveWorkbook.Worksheets feuille.[a1] = TextBox1 Next End Sub
Serge
"STEN" a écrit dans le message de news: 28e001c42847$c98da9b0$ Bonjour, Est-il possible de se servir d'un seul USF pour plusieurs feuille en sachant que toutes les feuilles sont formatées de la même façon. Exemple: je doit rentrer des données dans une feuille Date, N°, Du, Au, Montant comment faire pour me servir du même usf pour toutes les feuilles celle-ci vont de Janvier à Decembre. Merci de votre aide
STEN
-----Message d'origine----- Salut Sten,
«je doit rentrer des données dans une feuille» ???
Peut-être que :
Private Sub TextBox1_Change() For Each feuille In ActiveWorkbook.Worksheets feuille.[a1] = TextBox1 Next End Sub
Serge
"STEN" a écrit dans le message de news:
28e001c42847$c98da9b0$ Bonjour, Est-il possible de se servir d'un seul USF pour plusieurs feuille en sachant que toutes les feuilles sont formatées de la même façon. Exemple: je doit rentrer des données dans une feuille Date, N°, Du, Au, Montant comment faire pour me servir du même usf pour toutes les feuilles celle-ci vont de Janvier à Decembre. Merci de votre aide
.Bonjour Serge, En fait mon Usf doit me servir à rentrer des informations
succésivement dans mes feuilles. Exemple si j'ai fini de rentrer les informations dans la feuille janvier donc qui ne sera plus ouverte sauf pour revoir les données encore que pour ceci des sauvegardes sont générées automatiquement. Donc j'ouvre février et là je veux me servir du même usf que pour janvier, ceci afin de m'éviter la construction d'un usf pour chaque mois de l'année. Voilà j'espère que mon explication te conviendra Merci
-----Message d'origine-----
Salut Sten,
«je doit rentrer des données dans une feuille» ???
Peut-être que :
Private Sub TextBox1_Change()
For Each feuille In ActiveWorkbook.Worksheets
feuille.[a1] = TextBox1
Next
End Sub
Serge
"STEN" <jsterjean@aol.com> a écrit dans le message de
news:
28e001c42847$c98da9b0$a601280a@phx.gbl...
Bonjour,
Est-il possible de se servir d'un seul USF pour plusieurs
feuille en sachant que toutes les feuilles sont formatées
de la même façon.
Exemple: je doit rentrer des données dans une feuille
Date, N°, Du, Au, Montant comment faire pour me servir du
même usf pour toutes les feuilles celle-ci vont de
Janvier à Decembre.
Merci de votre aide
.Bonjour Serge,
En fait mon Usf doit me servir à rentrer des informations
succésivement dans mes feuilles.
Exemple si j'ai fini de rentrer les informations dans la
feuille janvier donc qui ne sera plus ouverte sauf pour
revoir les données encore que pour ceci des sauvegardes
sont générées automatiquement.
Donc j'ouvre février et là je veux me servir du même usf
que pour janvier, ceci afin de m'éviter la construction
d'un usf pour chaque mois de l'année.
Voilà j'espère que mon explication te conviendra
Merci
«je doit rentrer des données dans une feuille» ???
Peut-être que :
Private Sub TextBox1_Change() For Each feuille In ActiveWorkbook.Worksheets feuille.[a1] = TextBox1 Next End Sub
Serge
"STEN" a écrit dans le message de news:
28e001c42847$c98da9b0$ Bonjour, Est-il possible de se servir d'un seul USF pour plusieurs feuille en sachant que toutes les feuilles sont formatées de la même façon. Exemple: je doit rentrer des données dans une feuille Date, N°, Du, Au, Montant comment faire pour me servir du même usf pour toutes les feuilles celle-ci vont de Janvier à Decembre. Merci de votre aide
.Bonjour Serge, En fait mon Usf doit me servir à rentrer des informations
succésivement dans mes feuilles. Exemple si j'ai fini de rentrer les informations dans la feuille janvier donc qui ne sera plus ouverte sauf pour revoir les données encore que pour ceci des sauvegardes sont générées automatiquement. Donc j'ouvre février et là je veux me servir du même usf que pour janvier, ceci afin de m'éviter la construction d'un usf pour chaque mois de l'année. Voilà j'espère que mon explication te conviendra Merci
Alain CROS
Bonjour
Sur chaque feuille janvier, février, etc... Un bouton de Commande avec comme code
Private Sub CommandButton1_Click() UserForm1.Show End Sub
Dans ton Usf Une zone de texte avec comme code
Private Sub TextBox1_Change() ActiveSheet.[A1] = TextBox1 End Sub
Alain CROS
En fait mon Usf doit me servir à rentrer des informations succésivement dans mes feuilles. Exemple si j'ai fini de rentrer les informations dans la feuille janvier donc qui ne sera plus ouverte sauf pour revoir les données encore que pour ceci des sauvegardes sont générées automatiquement. Donc j'ouvre février et là je veux me servir du même usf que pour janvier, ceci afin de m'éviter la construction d'un usf pour chaque mois de l'année. Voilà j'espère que mon explication te conviendra Merci
Bonjour
Sur chaque feuille janvier, février, etc...
Un bouton de Commande avec comme code
Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
Dans ton Usf
Une zone de texte avec comme code
Private Sub TextBox1_Change()
ActiveSheet.[A1] = TextBox1
End Sub
Alain CROS
En fait mon Usf doit me servir à rentrer des informations
succésivement dans mes feuilles.
Exemple si j'ai fini de rentrer les informations dans la
feuille janvier donc qui ne sera plus ouverte sauf pour
revoir les données encore que pour ceci des sauvegardes
sont générées automatiquement.
Donc j'ouvre février et là je veux me servir du même usf
que pour janvier, ceci afin de m'éviter la construction
d'un usf pour chaque mois de l'année.
Voilà j'espère que mon explication te conviendra
Merci
Sur chaque feuille janvier, février, etc... Un bouton de Commande avec comme code
Private Sub CommandButton1_Click() UserForm1.Show End Sub
Dans ton Usf Une zone de texte avec comme code
Private Sub TextBox1_Change() ActiveSheet.[A1] = TextBox1 End Sub
Alain CROS
En fait mon Usf doit me servir à rentrer des informations succésivement dans mes feuilles. Exemple si j'ai fini de rentrer les informations dans la feuille janvier donc qui ne sera plus ouverte sauf pour revoir les données encore que pour ceci des sauvegardes sont générées automatiquement. Donc j'ouvre février et là je veux me servir du même usf que pour janvier, ceci afin de m'éviter la construction d'un usf pour chaque mois de l'année. Voilà j'espère que mon explication te conviendra Merci
