Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour le forum
Mon titre n'est pas très explicite, je m'en excuse.
Voici mon problème :
Un logiciel de comptabilité me permet de faire des extractions de données sous excel.
Une fois l'importation réalisée, les chiffres ne sont pas correctement formatés, et ils sont reconnus comme...
Abel écrit:
Exact Abel, mais je pensais l'avoir déja fait :
For Each ws In ThisWorkbook.Worksheets
If ws.Range('A1') = 'CHIFFRE D'AFFAIRE' Then
With ws.PageSetup
Je pense que ce qui me pose problème c'est que l'instruction
Next ws
est placée à la fin du code. il faudrait...
zut :o
je viens de constater qu'avec la macro réalisée la numérotation des pages ne fonctionne pas (elles sont toutes numérotées comme la 'page 1 / 1')...
Une idée ? :S
zut :o
je viens de constater qu'avec la macro réalisée la numérotation des pages ne fonctionne pas (elles sont toutes numérotées comme la 'page 1 / 1')...
Une idée ? :S
Salut le forum !
Bon juste un mot pour dire que tout fonctionne très bien.
Voici les 2 macros finales :
'Impression résultat
Sub Impression_Résultat()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
If ws.Range('A1') = 'CHIFFRE D'AFFAIRE' Then
With...
Effectivement cela fonctionne très bien,
Je vais maintenant passer de mon fichier test à mon fichier réel !
Bon je vous souhaite un bon we à tous (c'est le moment de faire une bonne pose là !), et Abel encore merci pour tout ;)
LA SUITE....
Encore merci Abdel, voilà où j'en suis :
Mon code est le suivant :
Sub ImprimePage2()
Dim ws As Worksheet
i = 1
For Each ws In ThisWorkbook.Worksheets
If ws.Range('A1') = 'CHIFFRE D'AFFAIRE' Then
With Sheets(i).PageSetup
.PrintArea =...
aaaahhhhhhhhhhhhhhhhh j'adore la seconde option...
J'explique pourquoi (en résumé) : le fait de réserver une zone dans chaque feuille permet, une fois la zone saisie, de faire des regroupements 'à la volée', et ça c'est bien pratique... On peut même imaginer que la zone de saisie fasse...
lol vi bien vu évidemment... heu.. jcrois que j'y avais pensé... Nan en fait ce qui m'interesse ce serait une liste figée à l'avance par exemple : 7, 8, 9, 11, 15, 17, 18, 19 à 33, 37, 42, etc...
Salut Abel et encore merci pour tes réponses, surtout si tu n'a pas beaucoup de temps...
Je débute dans le domaine, je fouine pas mal sur le web pour me former, j'avance lentement ,mais surement...
J'ai quand même une question par rapport à ta remarque :
Abel écrit:
Si les feuilles à...
Ca marche ! :)
Enfin la multi-impression marche...
Ce qu'il me faudrait maintenant c'est limiter l'impression à une sélection de feuilles...
du genre :
feuille 1 à 30
ou
feuille 1, 2, 3, 4, 5, ..., 30
Question : est il possible de paramétrer l'orientation du papier ?
Par...
Salut Abel, et merci pour ta réponse.
Oui ma zone d'impression est la même sur chacune des feuilles concernées...
Ta solution est interessante, je vais regarder ça... tite question quand même : comment limiter cette zone d'édition 3D, par exemple si je veux faire une édition partielle (39...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.