Microsoft 365 Formulaire

[Marec]

Bonjour,

Est il possible avec un formulaire de saisie,de remplir une feuille avec quelques données,et que cette dernière redevienne vierge après enregistrement de cette feuille en fichier excel ??

D'avance merci pour vos conseils ou exemples

 

[Compte Supprimé 979]

Bonsoir Marec,

Pour répondre strictement à la question, la réponse est OUI

😁 Bonne soirée

 

[mapomme]

Bonjour @BrunoM45 🙂 😉,

Pour répondre strictement à la question, la réponse est OUI

J'entends bien mais quels sont donc les arguments qui étayent cette réponse ? 😃😝😆🥳.

Bonne soirée.

 

[Marec]

Ça s'amuse bien ici 🥳

 

[mapomme]

Bonjour @Marec 🙂 .

Ça s'amuse bien ici 🥳

Ça peut pas faire de mal !

Mais plus sérieusement la réponse de @BrunoM45 est correcte.

Pour nous faire aller plus en avant, un fichier joint anonymisé avec la base de données et un début de formulaire de saisie (Userform) inciterait certains d'entre nous à pondre quelque code bien adapté à votre cas.

 

[Marec]

Bonjour,😉

Je comprends qui est préférable de fournir un fichier,mais rien n'est fait encore.
En fait,formulaire je me débrouille
Bdd aussi
Enregistrer macro aussi
Bien évidement a mon niveau🙄

Ce que cherche a faire,c'est a partir d'un formulaire,remplir une liste de colisage.
Enregistrer cette feuille obtenue, et la retrouver vide a la prochaine ouverture.
Si je créer 1 bouton pour vider le document,ne vais je pas effacer les formules qui contenue?

 

[mapomme]

Re,

Si je créer 1 bouton pour vider le document,ne vais je pas effacer les formules qui contenue?

Donc si j'ai bien compris, votre formulaire est une feuille de calcul Excel avec des formules ?

 

[Marec]

Je vais créer un formulaire userform
Pour alimenter un feuille de calcul qui sera en partie sous forme de bdd.
D'autres cellules en dehors de la bdd devront être remplies ( date. Numéro cde, réf)
Une fois remplie, j'enregistre la feuille dans un dossier.
Idéalement je la vide pour un prochaine utilisation,mais je voudrais ne par perdre les formules qui seront contenue dans cette Bdd

 

[vgendron]

Je vais créer un formulaire userform
Pour alimenter un feuille de calcul qui sera en partie sous forme de bdd.
D'autres cellules en dehors de la bdd devront être remplies ( date. Numéro cde, réf)
Une fois remplie, j'enregistre la feuille dans un dossier.
Idéalement je la vide pour un prochaine utilisation,mais je voudrais ne par perdre les formules qui seront contenue dans cette Bdd

Bonjour

il suffit de n'effacer QUE les cellules ne contenant pas de formule
ou alors.. la macro peut tout effacer et remettre les formules
mais comme indiqué plus haut.. sans fichier (meme une ébauche suffit) peu de chance de se lancer dans du code.

 

[Marec]

Merci,
Je vais tenter de faire, et je reviendrai avec le fichier

Vous souhaitant un bon Dimanche

 

[Marec]

Bonjour,

Je n'ai pas encore de fichier dispo.
Une question néanmoins:
A partir d'un userform, peut on remplir des cellules a droite, gauche haut en bas,d' une feuille . Excel ?

Si oui quel pourrait être le code code pour une cellule?
Histoire que je m'inspire

Merci a vous

 

[Compte Supprimé 979]

Bonjour Marec

Voici

Sub RemplirCelDGHB()
  With ActiveSheet
    .Cells(1, Columns.Count / 2).Value = "Haut"
    .Cells(Rows.Count, Columns.Count / 2).Value = "bas"
    .Cells(Rows.Count / 2, 1).Value = "Gauche"
    .Cells(Rows.Count / 2, Columns.Count).Value = "Droite"
  End With
End Sub

😜 😁

Nota : merci d'éditer votre 1er post et de modifier le titre SVP celui-ci doit être explicite !
mais cela ne semble pas être votre fort 🤔

 

[Marec]

Bonjour Marec

Voici

Sub RemplirCelDGHB()
  With ActiveSheet
    .Cells(1, Columns.Count / 2).Value = "Haut"
    .Cells(Rows.Count, Columns.Count / 2).Value = "bas"
    .Cells(Rows.Count / 2, 1).Value = "Gauche"
    .Cells(Rows.Count / 2, Columns.Count).Value = "Droite"
  End With
End Sub

😜 😁

Nota : merci d'éditer votre 1er post et de modifier le titre SVP celui-ci doit être explicite !
mais cela ne semble pas être votre fort 🤔

Bonjour BrunoM45

J'avoue ne pas être au fait de la démarche et des pratiques du forum .
Également,je me doute que mes requêtes sont loin d'être claire.
Quand j'aurai amorcé un fichier ce sera plus facile pour vous d'y voir clair.
Mais si j'ai quelques infos avant ,j'espère pouvoir avancer plus loin avant de le présenter.

Derniere question avant cette fin d'année :
Quel serait la procédure pour envoyer le contenu d'une txtbox ou cmbox dans une cellule d'une feuille excel du même classeur ?

Merci pour votre suivi

 

[Compte Supprimé 979]

Re,

On avance, vous commencez à parler des contrôles d'un USF 😉

Voici la réponse à votre question

Sheets("MaFeuille").Range("A1").Value = Me.TextBox1.Value

A+

 

[Marec]

Re,

On avance, vous commencez à parler des contrôles d'un USF 😉

Voici la réponse à votre question

Sheets("MaFeuille").Range("A1").Value = Me.TextBox1.Value

A+

Bonjour Bruno M45,

Une très belle Année 2023 vous et votre entourage.

Voilà donc un premier jet de ce ue je tente de faire.la mise en forme se ra finalisée par la suite et j'y ajouterai quelques formules.

Je voudrai maintenant ,en cliquant sur le bouton enregistrer,pouvoir re enregistrer plusieurs fois la même ligne.
Pour le moment ça plante. Pti coup de pouce??
J'ajouterai un bouton pour créer un pdf ou enregistrer le tableau excel .(je verrai)

Merci par avance