aide sur erreur d'exécution " 9 " sur textbox

[papattts]

Bonjour à tous

mon probléme, lorsque que j'actionne mon bouton Exit, un msgbox apparait, ("voulais vous imprimer feuille de report journalier") quand je clic sur Oui un message d'erreur n°9 apparait et dans VB elle me met la ligne ( sheets (" report journalier").select en jaune😡

Quelqu'un aurait il une réponse a ce soucis.🙂

Private Sub CommandButton1_Click()
Dim msg, style, title, réponse

With Application
.Calculation = xlAutomatic
.MaxChange = 0.001
End With
ActiveWorkbook.PrecisionAsDisplayed = False
WS1.AutoFilterMode = False
ActiveSheet.Protect Password:="tony", DrawingObjects:=True, Contents:=True, Scenarios:=True
Unload Me
'***********************************************************

msg = "Voulez-vous imprimer la feuille report journalier"
style = vbYesNo + vbQuestion + vbDefaultButton2
title = "Imprimer"
réponse = MsgBox(msg, style, title)

If réponse = vbYes Then


Sheets("report journalier").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
'**********************************************************************
Sheets("selections").Select


End Sub

merci d'avance
papattts

L'expérience de chacun est le trésor de tous

 

[PascalXLD]

Re : aide sur erreur d'exécution " 9 " sur textbox

Bonjour

il manque un end if avant le end sub

 

[papattts]

Re : aide sur erreur d'exécution " 9 " sur textbox

bonjour Pascal

j'avais déja essayé, Désolé ca ne fonctionne pas, j'ai toujours la méme erreur "Snif"

😕

 

[PascalXLD]

Re : aide sur erreur d'exécution " 9 " sur textbox

Re

Tu as bien une feuille qui s'appelle "report journalier" ????

 

[Darnel]

Re : aide sur erreur d'exécution " 9 " sur textbox

Bonjour

Je ne m'y connais pas bien en vba, mais à tous hazard, comment as tu rentré le nom de ta feuille, dans le code suivant :

( sheets (" report journalier").select

car excel aime pas les noms détachés.
suggestion qui a fonctionner pour moi :
copie colle le nom de la feuille, ou encore, avec l'enregistreur de macro, tu selectionne simplement la feuille en question et tu colle le code obtenu à la place de celui en place et qui ne fonctionne pas.

Enfin, il manque effectivement un Enf If

a+

EDIT : J'avais pas vu ta deuxième réponse pascal, mais j'ai l'impression que tu vas dans le même se,s que moi...?

 

[papattts]

Re : aide sur erreur d'exécution " 9 " sur textbox

re pascal

oui biensur,je l'ai méme refait mon application imprimer en "enregistré macro" pour etre sur que l'ecriture etait la bonne. j'ai zippé le fichier,mais je ne peux pas l'envoyer , trop lourd il depasse le 50 ko

merci de ton aide si tu trouve mon probléme
papattts

 

[PascalXLD]

Re : aide sur erreur d'exécution " 9 " sur textbox

Re

Envoies ton fichier sans données et il davrait faiore moins de 50 ko

 

[papattts]

Re : aide sur erreur d'exécution " 9 " sur textbox

re
j'ai supprimé tous les feuilles de report avec les formules qui etait avec ce classeur, mais compréssé il fait encore 121 ko

si je vire toutes mes macros ou mon user form tu ne va pas comprendre ?

une petite solution STP🙂

 

[PascalXLD]

Re : aide sur erreur d'exécution " 9 " sur textbox

Re

tu laisses juste ce que j'ai besoin rien de plus juste l'userform et les 2 feuilles

 

[papattts]

Re : aide sur erreur d'exécution " 9 " sur textbox

e
j'ai viré tous ce que je pouvais j'espere que ca ne va pas beuger

 

[Darnel]

Re : aide sur erreur d'exécution " 9 " sur textbox

re

A priori le fichier n'est pas passé

 

[papattts]

Re : aide sur erreur d'exécution " 9 " sur textbox

re , pascal et darnal

et merci de votre aide
c'est la 1 er fois fois que j'envoie un fichier, si un peu novice je l'ai envoyé par fichiers attachés mais apparement ce n'était pas ca ,mais j'ai trouvais je crois

🙂

 

[papattts]

Re : aide sur erreur d'exécution " 9 " sur textbox

re pascal et darnel

merci pour votre aide, j'ai essayé la soluce à darnel est sa fonctionne🙂
un deniere petite aide, on fait comment pour envoyer un fichier, je m'appercois que la 2 éme fois ca n'a pas marché non plus

l'expérience de chacun est le trésor de tous

re: merci

 

[PascalXLD]

Re : aide sur erreur d'exécution " 9 " sur textbox

Re

Quand tu cliques sur repondre un peu plus bas tu as gerer les pièces jointes
tu cliques dessus
une boite s'ouvre où tu choisis ton fichier
tu cliques sur uploader
quand le fichier est là tu ferme la fenêtre et tu envoies ta réponse

 

[papattts]

Re : aide sur erreur d'exécution " 9 " sur textbox

re
pour essai de piece jointe
il faisais 50 ko avant c'est pour cela qu'il ne passé pas

possible de me dire si la page s'imprime bien en panne d'imprimante

merci