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

un petit coup de pouce SVP

  • Initiateur de la discussion Initiateur de la discussion sasha
  • Date de début Date de début

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 !

Re : un petit coup de pouce SVP

Bonsoir Sasha,

Je pense que tu auras plus de réponse si exposes un peu plus clairement ce qui te pose problème.

Petit rappel:
Les intervenants sur ce forum sont bénévoles et passionnés certes, mais ne sont pas devins et ne sont pas compétents dans TOUS les domaines.
Donc, un titre de fil explicite nous permet de voir si c'est du domaine de notre compétence, une explication succinte et claire permet de préciser si c'est de notre ressort.

En bref, nous préférons passer du temps à répondre à une question qu'à essayer de deviner quelle est cette question.

Bon courage à toi

Edit :
Sûr que pour vs se sera de la broutille..
Pas la peine d'essayer de nous flatter, nous n'avons rien à prouver....
 
Dernière édition:
Re : un petit coup de pouce SVP

jE NE FLATTE PERSONNE, MAIS JE SUIS PAS DOUE EN VBA DONC JE M'ADRESSE SOUVENT A VOUS DS CE FORUM, ET LES REPONSES ARRIVENT SI VITE QUE J'AI VRAIMENT L'IMPRESSION DE M'ADRESSER A DES "PRO"- DONC PAS DE FLATTERIE MAIS JUSTE UN MOT GENTIL POUR DES INTERNAUTES D'HABITUDE CHALEUREUX- Mes questions sont notees en bleu ds le fichier joint- Pardon d'avoir dérangé
 
Re : un petit coup de pouce SVP

Salut Sasha, Luki et le Forum

Sasha écrire en majuscules n'aidera pas pour une réponse.

C'est l'équivalent de crier après le monde.

Comme Luki te la dit une question avec les problèmes à corriger
par cas et on t'aidera surement.

Ne pas oublier que nous ne sommes que des bénévoles qui donnent
un peu de notre temps et connaissance à aider les autres.

Déjà que tu peux joindre un fichier .xls ou .zip ic sans passer par Ci-Joint.

Mytå
 
Re : un petit coup de pouce SVP

Bonjour à tous,

Code:
[FONT=Verdana][SIZE=2][COLOR=#000000]Sub ProgrammeLaMacroTime()
' lance MacroImpression à 10h25 heures
Application.OnTime TimeValue("10:25:00"), "MacroImpression", , True
End Sub

Sub MacroImpression()
'cette macro imprime la feuille Feuil1
ThisWorkbook.Sheets("Feuil1").PrintOut
End Sub [/COLOR][/SIZE][/FONT]
Ce code fonctionne mais il faut lancer ProgrammeLaMacroTime() pour que l'impression se déclenche à l'heure donnée.
Pour la lancer automatiquement à l'ouverture du fichier,il faut mettre ceci dans ThisWorkbook :

Code:
Private Sub Workbook_Open()
' lance MacroImpression à 10h25 heures
Application.OnTime TimeValue("10:25:00"), "MacroImpression", , True
End Sub
Voici les macros 2 et 3 à la suite :

Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)

Sheets(1).[A1] = "Dernière modification le " & Format(Date, "dd-mm-yyyy")
ActiveWorkbook.SaveAs Filename:=Sheets(1).Range("A1").Value

End Sub

Et enfin la macro Copier-Coller :

Code:
Sub CopierColler()
On Error GoTo Erreur

Range("C18").Select
Selection.Copy
Windows("Tableau2.xls").Activate
Sheets("Feuil2").Range("C19").Select

ActiveSheet.Paste
Application.CutCopyMode = False
Exit Sub

Erreur:
MsgBox "Une erreur s'est produite!"
End Sub
@+
 
Re : un petit coup de pouce SVP

Bonjour à tous et à toi sasha

Il est vrai que nous sommes tous des bénévoles, et nous donnons autant que nous nous enrichissons des pb et des réponses de tous.
Et ceci est vrai dans tous les forums, que ce soit celui ci ou les autres (swisstools.net pour ne pas le nommer).
Un merci de la part du demandeur même si la réponse n'a rien résolu, ce qui n'est pas fait à chaque fois (le merci), c'est dommage. Cela commence par le repect des autres, la bien séance, le savoir vivre, alors ne nous en privons pas, n'est ce pas sasha.

Merci Myta, Luki, Sergio, et tous les autres qui effacent d'un coup de baguette nos problêmes par d'excellentes solutions.

A+

Cordialement
 
- 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

Réponses
2
Affichages
405
A
Réponses
7
Affichages
1 K
Axelle Beineix
A
B
  • Question Question
Réponses
36
Affichages
6 K
Blueberry-60
B
F
Réponses
15
Affichages
5 K
FlorianQ
F
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…