Discussion :

[Jean-Pierre49]

Bonjour a tous,

Je suis sur un Spreadsheet,

Je recupére les valeurs une plage de données (non définie a l’origine) d’une une feuille du classeur xls
Ce que je cherche, c’est de piloter le contrôle «plage affichable» de la feuille du Spreadsheet dans laquelle j’importe mes données
Je n’arrive pas à le trouver

A fin d’y indiquer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

= "$A$1:$H$" & Sheets("Feuil1").Range("A1").End(xlDown).Row

par exemple

Si quelqu’un peut me filer un coup de main.
Et si il existe quelque chose sur le Spreadsheet parce que j’ai l’inpréssion que j’ai pas fini…..

[Singular]

Qu'est-ce que tu entends par Spreadsheet? En Excel, il s'agit de Worksheet. Et quel est ce contrôle "plage affichable"? S'agit-il d'un contrôle que tu as mis toi-même dans la feuille?

[Jean-Pierre49]

Bonjour Singular

C'est un contrôle complementaire (Microsoft Office Spreadssheet 11.0)
pour la boite à outil des USF.

Il permet d'affichER une speudo feuille excel dans USF.

[Singular]

Essayes la propriété ViewableRange.

[SilkyRoad]

bonsoir

j'ai interprété (peut etre à tort) que tu souhaites afficher le contenu de ta feuille dans le controle SpreadSheet:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
'Testé avec Excel2007 & OWC11
Dim Tableau() As Variant
Dim x As Integer
 
x = Range("A1").End(xlDown).Row
 
Tableau = Range("A1:H" & x)
Spreadsheet1.ActiveSheet.Range("A1:H" & x) = Tableau

bonne soirée
michel

[Jean-Pierre49]

Bonjour Singular, SilkyRoad et à tous,

La proposition de SilkyRoad est bien mais ce n’est pas tout à fait ça. (elle fonctionne aussi sur Excel 2003).
Je veux effectivement récupérer une plage de valeur de ma feuille ainsi que le formats des cellules.
Ca c’est bon, même si je ne trouve pas ma méthode très élégante, je ne désespère pas de pouvoir l’améliorer.

Ce que je recherche c’est de limiter la plage affichée dans le Spreadsheet1,
Commandes et Options
Onglet Feuilles
Plage d’affichage

Pour la Propriété de Singular, je ne la trouve pas

[Jean-Pierre49]

J'ai trouvé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    Spreadsheet1.ActiveWindow.ViewableRange = "$A$1:$H$" & x