Traitement de feuilles, cellules, avec tableur calc
Résolu
shaftjackson
Messages postés
11
Date d'inscription
lundi 8 août 2005
Statut
Membre
Dernière intervention
8 février 2007
-
6 févr. 2007 à 14:48
shaftjackson Messages postés 11 Date d'inscription lundi 8 août 2005 Statut Membre Dernière intervention 8 février 2007 - 6 févr. 2007 à 18:12
shaftjackson Messages postés 11 Date d'inscription lundi 8 août 2005 Statut Membre Dernière intervention 8 février 2007 - 6 févr. 2007 à 18:12
A voir également:
- Traitement de feuilles, cellules, avec tableur calc
- Traitement image - Conseils pratiques -Java
- La cellule ou le graphique que vous essayez de modifier se trouve sur une feuille protégée ✓ - Forum VB.NET
- [Excel-VBA] Erreur 1004 Feuille protégée / ôter la protection, modifier contenu ✓ - Forum Visual Basic 6
- Feuille de temps à imprimer ✓ - Forum Visual Basic 6
- Vba fusionner des cellules ✓ - Forum VBA Office (Excel, Word ...)
2 réponses
shaftjackson
Messages postés
11
Date d'inscription
lundi 8 août 2005
Statut
Membre
Dernière intervention
8 février 2007
6 févr. 2007 à 18:12
6 févr. 2007 à 18:12
Trouvez !!
Il fallais que je remplace : Set Sheet = oDocument.Sheets(i)
par : Set Sheet = oDocument.Sheets.getByIndex(i)
Just keep Cool N Have fUn
Il fallais que je remplace : Set Sheet = oDocument.Sheets(i)
par : Set Sheet = oDocument.Sheets.getByIndex(i)
Just keep Cool N Have fUn
shaftjackson
Messages postés
11
Date d'inscription
lundi 8 août 2005
Statut
Membre
Dernière intervention
8 février 2007
6 févr. 2007 à 14:53
6 févr. 2007 à 14:53
Je me suis planté dans mon post précédent et comme je ne peux pas éditer/supprimer, je reprend ici :
Je souhaite sélectionner une rangée de cellule et j'ai fait ceci :
For i = 0 To oDocument.Sheets.Count - 1
Clipboard.Clear
Set Sheet = oDocument.Sheets(i)
oCells = Sheet.getCellRangeByName("A1:Z3000")'sélection des cellules
oDocument.Select(oCells)'collage dans le clipboard
<!-- END TEMPLATE: bbcode_code --> Une fois le processus de debug arrivée à cette ligne : oCells = Sheet.getCellRangeByName("A1:Z3000") <!-- END TEMPLATE: bbcode_code -->
le reste de la procédure est zappé (je n'ai aucun message d'erreur) et il poursuit sont traitement habilutel.
Donc quelqu'un saurait-il si qui va pas ? Ca m'aiderait !
Merci
PS.
J'ai testé : Set oCells = Sheet.getCellRangeByName("A1:Z3000")<!-- END TEMPLATE: bbcode_code -->
Mais je n'ai pas eu plus de succès :(
Just keep Cool N Have fUn
Je souhaite sélectionner une rangée de cellule et j'ai fait ceci :
For i = 0 To oDocument.Sheets.Count - 1
Clipboard.Clear
Set Sheet = oDocument.Sheets(i)
oCells = Sheet.getCellRangeByName("A1:Z3000")'sélection des cellules
oDocument.Select(oCells)'collage dans le clipboard
<!-- END TEMPLATE: bbcode_code --> Une fois le processus de debug arrivée à cette ligne : oCells = Sheet.getCellRangeByName("A1:Z3000") <!-- END TEMPLATE: bbcode_code -->
le reste de la procédure est zappé (je n'ai aucun message d'erreur) et il poursuit sont traitement habilutel.
Donc quelqu'un saurait-il si qui va pas ? Ca m'aiderait !
Merci
PS.
J'ai testé : Set oCells = Sheet.getCellRangeByName("A1:Z3000")<!-- END TEMPLATE: bbcode_code -->
Mais je n'ai pas eu plus de succès :(
Just keep Cool N Have fUn