Discussion :

[titeuf15]

Bonjour les amis.

Je travaille sur un petit projet .. et là .. je sèche un peu.

Je m'explique :

J'ai une page sur laquelle je mets les renseignements des agents (Nom, matricule, etc etc) .. je dois leur calculer les séjours passés dans leur carrière et déterminer les durées durant lesquels ils ont été lésés pour les régulariser ... donc les champs ordinaires à remplir ainsi que les dates de séjours qu'ils ont passé.

Bref .. tout cela a été fait et marche parfaitement.

MON PROBLEME : c'est que je veux qu'en cliquant sur un bouton (ENREGISTRER) qui contient déjà une macro qui enregistre la feuille actuelle sous un certain nom dans un dossier précis.
Donc je veux ajouter à cette macro ou à défaut faire une nouvelle qui m'enregistre certains champs (saisis ou résultats de cette feuille 1) dans un tableau de la feuille 2 (pour faire une synthèse à envoyer à la tutelle) suite à un clic de souris.

L'idéal serait que j'intègre dans le bouton 3 fonctions : Enregistrer une copie de la feuille actuelle (c'est déjà fait) + Remplir (compléter) le tableau de synthèse + Imprimer la page actuelle.

Je mettrai au besoin (dans les prochains posts), en pièce jointe, mon fichier EXEMPLE pour que ça soit plus explicite.

Merci

[Marc-L]

Bonjour, bonjour !

Rappels :

• Règles du forum, point IV-H (en profiter aussi pour lire les points IV-N et III-E)

• Important : [Actualité] Fichiers joints dans les discussions …

Voilà, voilà !

_________________________________________________________________________________________________________

Je suis Paris, Nice, Bruxelles, Charlie, …

[titeuf15]

Merci pour le rappel.

Toutes mes excuses.

Sincèrement, avec tant de forums, tant de règles ... nous passons toujours à coté de la réglementations en vigueur, nous ne lisons même pas la première ligne.

Nous sommes tellement pressés de résoudre nos problèmes qu'on ne prend même pas quelques minutes à lire les règles.

Encore désolé.

J’édite mon post comportant les Up ... et je supprime ma pièce jointe du premier message .. et j'attends patiemment que quelqu'un puisse m'aider.

Merci.

Marc_L ... je n'ai pas pu supprimer mon fichier en pièce jointe dans le post #1 .. pour être en règle

[Al__22]

Pour copier un champs vers un autre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets(1).Range("A1").Value = Sheets(2).Range("B4").Value

Ici la cellule A1 de ta 1re feuille va prendre la valeur de la cellule B4 de ta 2e feuille
A adapter à ton cas

[titeuf15]

Pour copier un champs vers un autre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets(1).Range("A1").Value = Sheets(2).Range("B4").Value

Ici la cellule A1 de ta 1re feuille va prendre la valeur de la cellule B4 de ta 2e feuille
A adapter à ton cas

Merci ...

donc je vais ajouter les lignes qui correspondent à mes cellules.

Mais comment faire pour que je remplisse mon nouveau tableau (une fois la première ligne terminée) pour me permettre d'enregistrer les nouvelles données en Ligne 2 ... etc.

[Al__22]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("A" & Rows.Count).End(xlUp).Row

Récupère la dernière ligne vide de ton incrémentation
Soit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets(1).Range("A" & Sheets(1).Range("A" & Rows.Count).End(xlUp).Row).Value = Sheets(2).Range("B4").Value

[titeuf15]

Merci ..

Je n'ai pas bien saisi ... je m'embrouille

Regarde ce que j'ai fais suite à ta première réponse :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
        Sheets(2).Range("a2").Value = Sheets(1).Range("a1").Value
        Sheets(2).Range("b2").Value = Sheets(1).Range("c3").Value
        Sheets(2).Range("c2").Value = Sheets(1).Range("d4").Value
        Sheets(2).Range("d2").Value = Sheets(1).Range("c5").Value
        Sheets(2).Range("e2").Value = Sheets(1).Range("l39").Value
        Sheets(2).Range("f2").Value = Sheets(1).Range("k43").Value

Là .. ce sont les cellules qui se copient de la feuille1 vers la feuille2 (dans mon cas).

Maintenant avec la nouvelle instruction ... je n'ai pas bien compris comment incrémenter ?

[Marc-L]

Publier le code du travail entrepris comme indiqué au point III-E accompagné d'une bonne présentation aiderait aussi …

Ne pas oublier l'Enregistreur de macros livrant sur un plateau une base de code !