Lire dans fichiers fermer

C

Compte Supprimé 979

Guest

• 6 Juin 2008

• #2

Re : Lire dans fichiers fermer

Bonsoir Don Foster,

En mettant un point d'arrêt dans ton code et en le faisant tourner en pas à pas, tu tombes sur

Code:

With ActiveSheet.Cells(Y + 3, 5)
.Formula = "='" & Sheets("Param").Range("B7").Value & " \[" & [B][COLOR=red]Tableau(X)[/COLOR][/B] & "]Fiche Info" _
& "'!" & "C6"
.Value = .Value
End With

C'est ICI que la mise à jour est demandé, car Tableau(X) = NE PAS SUPPRIMER P.xls

Donc pour mettre la formule, il a besoin d'ouvrir le fichier

A+

 

Vote positif 0 Vote négatif

D

Don Foster

Guest

• 7 Juin 2008

• #3

Re : Lire dans fichiers fermer

Bonjour BrunoM45 , le Forum

Merci pour ta réponse

J'ai avancé dans mes recherche mais toujours un problème peut être que cela vient de la version windows

- Essais fait sur millenium tous fonctionne
- Essais fait sur windows XP problème

je joint un nouveau Fichier avec expliquation

Merci pour votre aide

@ + Don Foster

 

Pièces jointes

• Test.zip

  42.7 KB · Affichages: 23
• Test.zip

  42.7 KB · Affichages: 22
• Test.zip

  42.7 KB · Affichages: 23

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 7 Juin 2008

• #4

Re : Lire dans fichiers fermer

Salut Don Foster,

Je ne comprends pas ce que tu veux faire dans ton fichier 😕
As-tu moyen de nous l'expliquer clairement ?

A+

 

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 7 Juin 2008

• #5

Re : Lire dans fichiers fermer

Bonjour Don Foster, Bruno,

Le problème des chemins sous Millenium ou antérieurs, Win2000 aussi, Vista peut-être, n'est pas tant dans le chemin, mais dans le nom des répertoires et sous répertoires.

C'est dans ce sens que tu dois te diriger.

Si j'ai bien compris toutefois.

Bonne pluie à tous.

Jean-Pierre

 

Vote positif 0 Vote négatif

D

Don Foster

Guest

• 7 Juin 2008

• #6

Re : Lire dans fichiers fermer

Bonjour jeanpierre , BrunoM45

Merci pour vos réponses .

En fait le problème que je rencontre est le suivant :

Sur windows millenium le programme fonctionne dans l'état actuel .
" listing des fichiers et affichage de certaines données "
Aucun problème .

Sur windows XP le programme me demande une mise à jour des valeurs .
" Mise à jour des valeurs "
Une fenêtre s'affiche et me demande une : Mise à jour des valeurs .
" Aucun listing de fichiers et aucune données affichées "

Le but étant de récupérer le nom des fichiers ainsi que certaines données des fichiers " fiches de produits "

Etapes :

Ouvrir le fichier : " Base de donnée produits "
Cliquer sur le bouton : " Actualiser "

En espérant être assez précis dans ma demande Merci pour vos réponses .

@ + Don Foster

 

Vote positif 0 Vote négatif

D

Don Foster

Guest

• 8 Juin 2008

• #7

Re : Lire dans fichiers fermer

Bonjour à toute et à tous

Personnes pour un petit coup de pouce !

Après de multiples essais toujours pas trouvé le problème.

Merci à vous ...

@ + don foster

 

Vote positif 0 Vote négatif

J

jmd2

XLDnaute Accro

• 8 Juin 2008

• #8

Re : Lire dans fichiers fermer

hello

jeanpierre t'a donné une piste, suis-la, elle semble bonne.

moi j'ai ouvert tonfichier, il s'appelle

Base de Donn'e Produits.xls (le é est remplacé par une ' )

tu comprends ce que voulait dire jeanpierre
évite les accents, les blancs, et si possible reste à 8 caractères, comme sous DOS 🙂
idem pour les répertoires.

***************************************************************

 

Dernière édition: 8 Juin 2008

Vote positif 0 Vote négatif

D

Don Foster

Guest

• 8 Juin 2008

• #9

Re : Lire dans fichiers fermer

Bonsoir jmd2 , le Forum

Merci pour ta réponse.

J'ai modifié le nom des répertoires et fichiers mais rien n'y fait.
Par contre en mettant le chemin directement dans le code VBA ça marche.

Moi je voudrais récupérer le chemin par l'intermédiaire d'une cellule d'une feuille pour éviter à avoir à modifier le code à chaque fois que l'on déplace le dossier complet et là ça ne marche plus , du moin sur Windows XP , par contre sur millenium ça marche ... Bizarre !

Je joint un nouveau fichier avec explication dans le code VBA.

Merci à vous tous pour votre aide.

@ + Don Foster

 

Pièces jointes

• LireFichierFermer.zip

  41.8 KB · Affichages: 22

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 8 Juin 2008

• #10

Re : Lire dans fichiers fermer

Salut Don Foster,

Peut être un petit indice

'ICI CA NE FONCTIONNE PAS . chemin récupérer dans une cellule
'-------------------------------------------------------------
'With ActiveSheet.Cells(Y + 3, 10)
'.Formula = "='" & Sheets("Param").Range("B7").Value& " \[" & Tableau(X) & "]Fiche" _
& "'!" & "B2"
'End With

Cliquez pour agrandir...

Tu ajoutes un espace + slash à ton nom de fichier,
alors que la valeur de ta cellule est : D:\Nos Documents\Dossier EXCEL\_Excel-dowloads\DonPhoster\Articles\

J'ai testé

Code:

  .Formula = "='" & Sheets("Param").Range("B7").Value & "[" & Tableau(X) & "]Fiche" _
  & "'!" & "B2"

chez moi, ça fonctionne, a vérifier !

PS : C'est pour ce genre de problème semi invisible que j'aime passer par des variables
MaFormule= "='" & Sheets("Param").Range("B7").Value & " \[" & Tableau(X) & "]Fiche" _
& "'!" & "B2"

Comme tu peux vérifier la valeur de "MaFormule"

A+

 

Dernière modification par un modérateur: 8 Juin 2008

Vote positif 0 Vote négatif

D

Don Foster

Guest

• 8 Juin 2008

• #11

Re : Lire dans fichiers fermer

Bonsoir BrunoM45

Merci à toi pour ta réponse , je viens de tester et tous fonctionne à merveille.

Encore merci et bonne soirée à toi.

@ + Don Foster

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 8 Juin 2008

• #12

Re : Lire dans fichiers fermer

Re,

Wouhaoouuuuu ... top gééééénnniiiiiaaaaallllll

Ca va être la fête à Gannat ce soir 😀


Aller, à la tienne Don Foster


A+

 

Vote positif 0 Vote négatif