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

Sauvegarde d'un Userform

Créer une discussion

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 !

S'inscrire

captainejack

XLDnaute Occasionnel
Bonjour à tout le Forum

J'ai créé cette Userform (fichier joint) pour faire des fiches que j'imprime .
Je souhaiterai sauvegardé cet Userform sous Word, de façon à le réimprimer tel qu'il se présente.
Est ce possible? Et quel serait le code du bouton que je vais ajouter?
En vous remerciant pour votre aide

Slts

Dan
 

Pièces jointes

Trier par date Trier par votes
Re : Sauvegarde d'un Userform

Bjr à tous

Quel serait le code VBA pour ajouter un bouton sur mon USERFORM , pour l'enregistrer avec les donnéesdans mes documents en document Word?

En vous remerciant
Slts
 
Vote positif 0 Vote négatif
Re : Sauvegarde d'un Userform

Bonsoir captainejack, Michel 🙂, et à ceux qui passeront par ici,

Il y a un moyen que j'utilise parfois avec un bouton provisoire dans L'USF:

Code: 
Dim LES_TRUCS As Control

For Each LES_TRUCS In Me.Controls
N=N+1
    If TypeName(LES_TRUCS) = "CommandButton" Then
      With ActiveSheet
      .Cells(N, 1).Value = LES_TRUCS.Name
      .Cells(N, 2).Value = LES_TRUCS.Top
      .Cells(N, 3).Value = LES_TRUCS.Left
      .Cells(N, 3).Value = LES_TRUCS.Caption
      ' Et c.
    End If

    If TypeName(LES_TRUCS) = "TextBox" Then
      .....................................
       ........................................
      .Cells(N, 3).Value = LES_TRUCS.Value
   ' "Value", car le TextBox n'a oas de "Caption"
    End if
Next LES_TRUCS

A chercher de ce coté éventuellement.

Amicalement,

Yann
 
Vote positif 0 Vote négatif
Re : Sauvegarde d'un Userform

Post effacé par mes soins!

Je n'avais pas bien compris la question.

Ma réponse était donc inappropriée

Désolé

Yann
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Sauvegarde d'un Userform

Merci Yann

Merci pour le code
Je supose que les "trucs" c'est le non de mon Userfor et le nom de mes textbox
Par contre je ne comprends pas très bien le code car je ne vois pas le chemin pour l'enregistrement(C:\Users\....)
Peut on m'expliquer
Slts
Dan
 
Vote positif 0 Vote négatif
Re : Sauvegarde d'un Userform

Re 🙂,
Pas sûr que tu lises vraiment les réponses 🙄...
MJ13 à dit:
Essaye:
Alt+Impr Ecran puis ouvre Word puis ctrl +v.
Cliquez pour agrandir...
captainejack à dit:
j' avais pensé à cette solution mais je suis sûre qu'il existe un code pour l'enregistrement....
Cliquez pour agrandir...
JNP à dit:
En développant la solution de Michel avec SendKeys éventuellement 🙄...
Cliquez pour agrandir...
YANN-56 à dit:
Je n'avais pas bien compris la question.
Ma réponse était donc inappropriée
Cliquez pour agrandir...
captainejack à dit:
Par contre je ne comprends pas très bien le code car je ne vois pas le chemin pour l'enregistrement(C:\Users\....)
Cliquez pour agrandir...
La solution de Yann sauvegarde les données dans une feuille Excel, donc tu ne risques pas de trouver de chemin 🙄...
Michel te proposait de faire une copie écran, tu souhaites le faire par code, je te proposes l'utilisation de SendKeys qui simule une frappe écran, donc te permettra de copier l'écran, il suffit que tu crées via VBA un fichier Word, une petite temporisation pour que le fichier soit bien ouvert, et simuler un Coller 🙄...
Bonne méditation 😎
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

Discussions similaires

C
  • Résolu(e)
Microsoft 365 bouton pour un userform
Réponses
14
Affichages
590
C'est Génial
C
  • Question Question
XL 2019 Copier et coller automatiquement une nouvelle donnée par un bouton, ListView décallée à la sur la page (Multipage) et vibration du Userform
2
Réponses
16
Affichages
977
TooFatBoy
M
  • Résolu(e)
Microsoft 365 Impression Userform en format paysage + Envoyer l'imprime écran du Userform par courriel
2
Réponses
17
Affichages
1 K
patricktoulon
G
  • Question Question
Microsoft 365 Labels qui se dimensionnent tous seuls.
Réponses
3
Affichages
320
GClaire
G
  • Résolu(e)
Microsoft 365 Forcer l'affichage de mon userform (barre de progression) sur l'écran où le classeur est actif (cas des doubles/triples écrans)
3 4 5
Réponses
66
Affichages
4 K
Dudu2
  • Question Question
Microsoft 365 Recherche et enregistrement document
3 4 5
Réponses
62
Affichages
2 K
dysorthographie
P
  • Question Question
Microsoft 365 garder en mémoire plusieurs listview d'un userform
Réponses
4
Affichages
725
patricktoulon
L
  • Question Question
XL 2019 aligner textbox userform et valeur de cellule
Réponses
1
Affichages
518
fanfan38
  • Question Question
Microsoft 365 Remplacement d'une zone de texte Activex
Réponses
7
Affichages
703
wDog66
W
L
  • Résolu(e)
XL 2016 dimensions minimum d'un userform (Résolu)
Réponses
8
Affichages
670
LEMLEM
L
F
  • Question Question
XL 2016 Générer un rapport pdf depuis excel
2
Réponses
22
Affichages
3 K
fraux
F
Z
  • Résolu(e)
XL 2021 Tester l'existence d'un nom d'onglet
Réponses
3
Affichages
671
jm.andryszak
J
  • Question Question
Microsoft 365 Création d'un fichier entier par rapport à des entrées via UserForm
Réponses
1
Affichages
787
job75
  • Résolu(e)
XL 2016 XLS - Comment déterminer les zones présentent au niveau d'une cellule ?
Réponses
2
Affichages
852
Lu76Fer
T
  • Question Question
Listbox 14 colonnes
Réponses
6
Affichages
919
TAL
T
Z
  • Résolu(e)
Microsoft 365 (résolu) Etablir un classement avec des ex-aequo sur la base d'une autre valeur
Réponses
2
Affichages
534
zedude
Z
T
  • Question Question
Fermeture USF
Réponses
1
Affichages
656
Dranreb
C
  • Question Question
Autres Dans Excel, à partir d'un UserForm, copier l'adresse sélectionnée dans enveloppe de publipostage Word et ouvrir la fenêtre "aperçu avant impression"
Réponses
11
Affichages
945
Chatron
C
L
  • Question Question
Microsoft 365 recherche idée
Réponses
6
Affichages
923
alexga78
A
M
  • Question Question
XL 2019 Assigner une valeur dans une combobox à partir du caption d'un button command
Réponses
8
Affichages
831
mallow2000
M
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…