Nous sommes actuellement le 10 Juil 2026, 23:06

Le fuseau horaire est UTC-5 heures [Heure d’été]




Publier un nouveau sujet Répondre au sujet  [ 5 message(s) ] 
Auteur Message
 Sujet du message: # de commande dans excel
MessagePublié: 10 Mai 2003, 12:42 
Hors-ligne
Occasionnel
Occasionnel
Avatar de l’utilisateur

Inscription : 17 Août 2002, 09:24
Message(s) : 200
J'ai fais un petit formulaire dans excel et je voudrais ajouter dans le coin droite un # de commande. l'utilité est seulement à l'impression. Je voudrais imprimer la meme page 200 fois, mais que le # de commande sois different sur chaque pages imprimés.

Est-ce possible et comment svp ?

Merci!

Stephen

ex: 2125,2126,2127,2128.. etc ou encore mieux janvier2125, janvier2126, janvier2127 etc etc..


Haut
 Profil  
Répondre en citant  
 Sujet du message:
MessagePublié: 12 Mai 2003, 14:16 
Hors-ligne
Nouvel adepte
Nouvel adepte

Inscription : 21 Juin 2002, 15:06
Message(s) : 94
Localisation : Beauport
tu doit ajouter ce code, le seul inconvenient c'est que tu ne peut demander 200 impresions 1 fois, tu doit demander 200 fois une impresion.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Range("Colonne" & #Ligne).Value = 999999 Then
Range("Colonne" & #Ligne).Value = 1
Else
Range("Colonne" & #Ligne).Value = Range("Colonne" & #Ligne).Value + 1
End If
End Sub


Haut
 Profil  
Répondre en citant  
 Sujet du message:
MessagePublié: 13 Mai 2003, 10:12 
Hors-ligne
Régulier
Régulier
Avatar de l’utilisateur

Inscription : 07 Jan 2002, 10:30
Message(s) : 260
Localisation : Sainte-Foy
Code :
  Dim Boucle As Integer

  Range("A1").Select
 
  For Boucle = 2125 To 2128 
      ActiveCell.FormulaR1C1 = "Janvier " & Boucle
      ActiveSheet.PrintOut
  Next Boucle


Ceci devrait fonctionner. Je vous conseil toutefois de l'essayer tout d'abord avec un interval tout petit (au cas ou ça ne marcherait pas).


Haut
 Profil  
Répondre en citant  
 Sujet du message:
MessagePublié: 13 Mai 2003, 17:47 
Hors-ligne
Fidèle
Fidèle
Avatar de l’utilisateur

Inscription : 07 Jan 2002, 18:50
Message(s) : 900
Localisation : Vers l'infini et plus loin encore!!
Asl a écrit:
tu doit ajouter ce code, le seul inconvenient c'est que tu ne peut demander 200 impresions 1 fois, tu doit demander 200 fois une impresion.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Range("Colonne" & #Ligne).Value = 999999 Then
Range("Colonne" & #Ligne).Value = 1
Else
Range("Colonne" & #Ligne).Value = Range("Colonne" & #Ligne).Value + 1
End If
End Sub


Tu ajoute ce code où ?

_________________
puisse la fortune favoriser les inconscients


Haut
 Profil  
Répondre en citant  
 Sujet du message:
MessagePublié: 13 Mai 2003, 20:37 
Hors-ligne
Toujours là!
Toujours là!
Avatar de l’utilisateur

Inscription : 08 Jan 2002, 22:05
Message(s) : 1332
Localisation : Québec
dans le code de ton workbook. Tu as un évènement qui s'appelle BeforePrint et tu entres le code de Asl à cet endroit


Haut
 Profil  
Répondre en citant  
Afficher les messages publiés depuis :  Trier par  
Publier un nouveau sujet Répondre au sujet  [ 5 message(s) ] 

Le fuseau horaire est UTC-5 heures [Heure d’été]


Qui est en ligne ?

Utilisateur(s) parcourant ce forum : Aucun utilisateur inscrit et 2 invité(s)


Vous ne pouvez pas publier de nouveaux sujets dans ce forum
Vous ne pouvez pas répondre aux sujets dans ce forum
Vous ne pouvez pas éditer vos messages dans ce forum
Vous ne pouvez pas supprimer vos messages dans ce forum

Recherche de:
Aller vers :  
cron
Propulsé par phpBB® Forum Software © phpBB Group
Traduction et support en françaisHébergement de site