Je viens de m'apercevoir que si j'enlève la protection de la feuille
"facture1page" du classeur "sarl lm construction", je n'ai pas de problèmes.
Bien que sur 1 fichier enregistré ça fonctionne avec la protection activée.
Me serait-il possible de contourner ce problème pour pouvoir travailler avec
la protection activée ? ou bien cela est du à des cellules qui ne sont pas
protégées en fin de feuille ?
Merci encore
Salutations
Peponne31
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Compris. Je n'avais pas vu les lignes en bas du devis. Remplace :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _ Workbooks(Fich & ".xls").Sheets(Feuille).Range("A65536").End(xlUp))
par :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _ Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21").End(xlDown))
Cordialement. Daniel "Peponne31" a écrit dans le message de news:
Bonjour,
Je viens de m'apercevoir que si j'enlève la protection de la feuille "facture1page" du classeur "sarl lm construction", je n'ai pas de problèmes. Bien que sur 1 fichier enregistré ça fonctionne avec la protection activée. Me serait-il possible de contourner ce problème pour pouvoir travailler avec la protection activée ? ou bien cela est du à des cellules qui ne sont pas protégées en fin de feuille ? Merci encore Salutations Peponne31
Bonjour.
Compris. Je n'avais pas vu les lignes en bas du devis. Remplace :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _
Workbooks(Fich &
".xls").Sheets(Feuille).Range("A65536").End(xlUp))
par :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _
Workbooks(Fich &
".xls").Sheets(Feuille).Range("A21").End(xlDown))
Cordialement.
Daniel
"Peponne31" <Peponne31@discussions.microsoft.com> a écrit dans le message de
news: DF7FD749-D05C-49C4-9C4B-270785873793@microsoft.com...
Bonjour,
Je viens de m'apercevoir que si j'enlève la protection de la feuille
"facture1page" du classeur "sarl lm construction", je n'ai pas de
problèmes.
Bien que sur 1 fichier enregistré ça fonctionne avec la protection
activée.
Me serait-il possible de contourner ce problème pour pouvoir travailler
avec
la protection activée ? ou bien cela est du à des cellules qui ne sont pas
protégées en fin de feuille ?
Merci encore
Salutations
Peponne31
Bonjour. Compris. Je n'avais pas vu les lignes en bas du devis. Remplace :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _ Workbooks(Fich & ".xls").Sheets(Feuille).Range("A65536").End(xlUp))
par :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _ Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21").End(xlDown))
Cordialement. Daniel "Peponne31" a écrit dans le message de news:
Bonjour,
Je viens de m'apercevoir que si j'enlève la protection de la feuille "facture1page" du classeur "sarl lm construction", je n'ai pas de problèmes. Bien que sur 1 fichier enregistré ça fonctionne avec la protection activée. Me serait-il possible de contourner ce problème pour pouvoir travailler avec la protection activée ? ou bien cela est du à des cellules qui ne sont pas protégées en fin de feuille ? Merci encore Salutations Peponne31
Peponne31
Re Merci beaucoup, cette fois ça fonctionne je suis content (il en faut peux) mais il est clair que sans ton aide je ni serai pas arrivé, ça vaut bien l'appéro pour le dérangement causé et mème + Merci encore je vais continuer à améliorer et je vais essayer de lui adjoindre une fonction fax qui me permétrai d'envoyer le document sans avoir à l'imprimer. Bon week-end Peponne31
Bonjour. Compris. Je n'avais pas vu les lignes en bas du devis. Remplace :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _ Workbooks(Fich & ".xls").Sheets(Feuille).Range("A65536").End(xlUp))
par :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _ Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21").End(xlDown))
Cordialement. Daniel "Peponne31" a écrit dans le message de news:
Bonjour,
Je viens de m'apercevoir que si j'enlève la protection de la feuille "facture1page" du classeur "sarl lm construction", je n'ai pas de problèmes. Bien que sur 1 fichier enregistré ça fonctionne avec la protection activée. Me serait-il possible de contourner ce problème pour pouvoir travailler avec la protection activée ? ou bien cela est du à des cellules qui ne sont pas protégées en fin de feuille ? Merci encore Salutations Peponne31
Re
Merci beaucoup, cette fois ça fonctionne je suis content (il en faut peux)
mais il est clair que sans ton aide je ni serai pas arrivé, ça vaut bien
l'appéro pour le dérangement causé et mème +
Merci encore je vais continuer à améliorer et je vais essayer de lui
adjoindre une fonction fax qui me permétrai d'envoyer le document sans avoir
à l'imprimer.
Bon week-end
Peponne31
Bonjour.
Compris. Je n'avais pas vu les lignes en bas du devis. Remplace :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _
Workbooks(Fich &
".xls").Sheets(Feuille).Range("A65536").End(xlUp))
par :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _
Workbooks(Fich &
".xls").Sheets(Feuille).Range("A21").End(xlDown))
Cordialement.
Daniel
"Peponne31" <Peponne31@discussions.microsoft.com> a écrit dans le message de
news: DF7FD749-D05C-49C4-9C4B-270785873793@microsoft.com...
Bonjour,
Je viens de m'apercevoir que si j'enlève la protection de la feuille
"facture1page" du classeur "sarl lm construction", je n'ai pas de
problèmes.
Bien que sur 1 fichier enregistré ça fonctionne avec la protection
activée.
Me serait-il possible de contourner ce problème pour pouvoir travailler
avec
la protection activée ? ou bien cela est du à des cellules qui ne sont pas
protégées en fin de feuille ?
Merci encore
Salutations
Peponne31
Re Merci beaucoup, cette fois ça fonctionne je suis content (il en faut peux) mais il est clair que sans ton aide je ni serai pas arrivé, ça vaut bien l'appéro pour le dérangement causé et mème + Merci encore je vais continuer à améliorer et je vais essayer de lui adjoindre une fonction fax qui me permétrai d'envoyer le document sans avoir à l'imprimer. Bon week-end Peponne31
Bonjour. Compris. Je n'avais pas vu les lignes en bas du devis. Remplace :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _ Workbooks(Fich & ".xls").Sheets(Feuille).Range("A65536").End(xlUp))
par :
Set Plage = Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21", _ Workbooks(Fich & ".xls").Sheets(Feuille).Range("A21").End(xlDown))
Cordialement. Daniel "Peponne31" a écrit dans le message de news:
Bonjour,
Je viens de m'apercevoir que si j'enlève la protection de la feuille "facture1page" du classeur "sarl lm construction", je n'ai pas de problèmes. Bien que sur 1 fichier enregistré ça fonctionne avec la protection activée. Me serait-il possible de contourner ce problème pour pouvoir travailler avec la protection activée ? ou bien cela est du à des cellules qui ne sont pas protégées en fin de feuille ? Merci encore Salutations Peponne31
