Liaison Feuille Classeur ???

F

fahd

Guest

• 1 Juillet 2003

• #2

est ce ke tu ve le faire en vba??
si oui, tu peux instancier ton fichier "Dernier.xls" application.open, et récupérer tous les données ke tu ve

 

Vote positif 0 Vote négatif

F

fahd

Guest

• 1 Juillet 2003

• #3

je me suis gourré désolé
par contre ce ke tu pe faire c exporter ta feuille excel, et la charger ds ton nouveau classeur

 

Vote positif 0 Vote négatif

C

cOx

Guest

• 1 Juillet 2003

• #4

Oui, je voudrais le faire en vba et si possible sans ouvrir le fichier "Dernier.xls" ...

 

Vote positif 0 Vote négatif

F

fahd

Guest

• 1 Juillet 2003

• #5

voila pour ouvrir ton fichier excel : Workbooks.Open "TonFichier.XLS"

 

Vote positif 0 Vote négatif

C

cOx

Guest

• 1 Juillet 2003

• #6

J'ai vu sur certains postes qu'il était possible d'importer une feuille dans un classeur fermé et de la coller dans le classeur actif...

Mais je ne vois pas comment faire

 

Vote positif 0 Vote négatif

C

cOx

Guest

• 1 Juillet 2003

• #7

J'ai trouvé ça mais ça mets "0" dans les cases vides, lors de la copie dans le classeur actif ???

Je ne comprends pas...
Si il existe une autre solution, ou un moyen de détourner ces "0"...

 

Vote positif 0 Vote négatif

C

cOx

Guest

• 1 Juillet 2003

• #8

J'ai trouvé ça mais ça mets "0" dans les cases vides, lors de la copie dans le classeur actif ???

Comment récuperer des données d'un classeur fermé?
Récupération de données dans un classeur fermé
(méthode "classique" par établissement d'une liaison temporaire)
(c'est aussi la technique habituellement conseillée pour essayer
de récupérer des données d'un classeur endommagé) Fréderic S.

Sub test()
GetValuesFromAClosedWorkbook "D:", "TestADO.xls", "Feuil1", "A1:H25"
End Sub

Sub GetValuesFromAClosedWorkbook(fPath As String, _
fName As String, sName, cellRange As String)
'Ron De Bruin, mpep
'le paramètre 'cellRange' doit désigner
'*une* plage de cellules *contigües*
With ActiveSheet.Range(cellRange)
.Formula = "='" & fPath & "\[" & fName & "]" _
& sName & "'!" & cellRange
.Value = .Value
End With
End Sub


Je ne comprends pas...
Si il existe une autre solution, ou un moyen de détourner ces "0"...

 

Vote positif 0 Vote négatif

F

fahd

Guest

• 1 Juillet 2003

• #9

ben tu craie une macro qui te teste l'ensemble de t cellules, si ya 0, elle efface le contenu , sinon elle fait rien
appart ca ya pas d'autre moyen

 

Vote positif 0 Vote négatif

C

cOx

Guest

• 1 Juillet 2003

• #10

Le problème :

Certaines de mes cellules contiennent la valeur "0"...

Merci quand même

Je vais continuer mes recherches sur le Net

 

Vote positif 0 Vote négatif

A

A-binouze_drinker_among_others

Guest

• 1 Juillet 2003

• #11

pour creer des liaisons tu peux proceder de la maniere suivante


ouvre tes 2 classeurs

dans toto.xls, entre en mode edition dans une cellule, commence a taper = comme si tu allais ecrire une formule, puis actionne en meme temps les touches Ctrl et F6 pour basculer dans l autre classeur, tu te deplaces dans les feuilles de cet autre classeur pour selectionner la cellule de ton choix, puis tu fais entrer

cela te ramene dans ton classeur toto.xls

ferme ton second classeur, tu devrais alors voir dans toto.xls que lq formule fait reference a cet autre classeur, si necessaire sauve toto.xls, ferme le et rouvre le


bye
stephane

 

Vote positif 0 Vote négatif