Discussion :

[vulcain91]

Bonjour,

sur un fichier excel j'importe des données venants de SAP sur une feuille et sur une autre feuille j'ai une liaison avec une requete access, quand je fait une rechercheV pour croisée les 2 feuilles ça ne marche pas.

Sur la feuille access la colonne ou je fait ma recherche est au format standard avec 8 chiffres, l'affichage est a gauche.
Quand je vais dans l'une des cellules, je me met a droite du texte et je fait juste "enter", et la par miracle l'affichage passe a droite et mon rechercheV marche, pas a 100% mais il me trouve 90% des champs que je recherche.

J'ai essayer plusieurs format de cellule mais rien n'y fait sauf le fait le faire "enter" dans chaque cellule, ce qui n'est pas pratique du tout.

Si quelqu'un a une solution, merci de votre aide.

[ullan]

Bonjour,

Il peut y avoir plusieurs raisons, difficile à préciser sans avoir le fichier sous les yeux..

Celle la plus souvent rencontrée est l'espace (séparateur de milliers).

[random]

essayes ça

selection des données sap
édition copier
édition collage spécial valeur

[vulcain91]

Bonjour,

Il peut y avoir plusieurs raisons, difficile à préciser sans avoir le fichier sous les yeux..

Celle la plus souvent rencontrée est l'espace (séparateur de milliers).

Je ne peux pas envoyer le fichier car il y a des données perso des agents de ma boite.

Dans ce champ il n'y a pas de séparateur de milliers c'est un chiffre du style "60665161".

Si tu veux vraiment regarder mon fichier je peux eventuellement préparé une version light.

Merci de ta réponse.

[ullan]

Re,

Quelques lignes suffisent, et modifie les noms.

[vulcain91]

essayes ça

selection des données sap
édition copier
édition collage spécial valeur

ça ne change rien
le probleme vient plutot de la liaison avec access il me semble

[vulcain91]

Re,

Quelques lignes suffisent, et modifie les noms.

je joint le fichier

http://www.cybervulcans.net/upload/f...calcul HMO.xls

merci de ton aide

[Invité]

Bonjour Vulcain91,

Une solution qui n'est peut-être pas la meilleure mais qui est simple :

Ce code dans votre feuille "Import Access" :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Sub Mef()
Dim i As Long, mv As Long, dl As Long
 
dl = Range("A65536").End(xlUp).Row
   For i = 2 To dl
  mv = Cells(i, 1)
   Cells(i, 1).ClearContents
   Cells(i, 1) = mv
Next i
 
End Sub

[ullan]

Bonjour,

Aucun problème, le RECHERCHEV fonctionne (LISTE AGENTS), tant en faisant référence à la cellule (par exemple : B3) qu'à son contenu (par exemple : 31488018)
J'ai étiré ces deux formules et aucun ennui.

Si tu avais mis ta formule sur la pièce jointe, ou précisé où il fallait la mettre, peut-être aurais-je pu constater une quelconque anomalie, mais ici, rien.

[vulcain91]

Bonjour Vulcain91,

Une solution qui n'est peut-être pas la meilleure mais qui est simple :

Ce code dans votre feuille "Import Access" :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Sub Mef()
Dim i As Long, mv As Long, dl As Long
 
dl = Range("A65536").End(xlUp).Row
   For i = 2 To dl
  mv = Cells(i, 1)
   Cells(i, 1).ClearContents
   Cells(i, 1) = mv
Next i
 
End Sub

C'est déjà pas mal comme macro, ça aide bien même si ça résout pas mon problème a 100%.
tu automatise ce que je faisais a la mano.
La macro est très lente, il y a une raison ?
je suis nul en VBA tu pourrais m'expliquer cette macro STP

MErci de ton aide

[vulcain91]

Bonjour,

Aucun problème, le RECHERCHEV fonctionne (LISTE AGENTS), tant en faisant référence à la cellule (par exemple : B3) qu'à son contenu (par exemple : 31488018)
J'ai étiré ces deux formules et aucun ennui.

Si tu avais mis ta formule sur la pièce jointe, ou précisé où il fallait la mettre, peut-être aurais-je pu constater une quelconque anomalie, mais ici, rien.

Effectivement la rechercheV marche super sur le champ "ATELIER" mais c'est sur les champs "CLASSE", "AVION", "SN", "DS" et "TAT" qu'il y a un bug sur la feuille "import" qui va chercher les infos sur la feuille "IMPORT ACCESS".

Même si la macro de jacques_jean m'aide bien ça ne résout pas mon problème a 100%.

Merci de prendre sur votre temps pour m'aider

@+

[Invité]

Re Vulcain91,

Cette macro, même pour plusieurs milliers de lignes ne devrait prendre que 2 ou secondes.

Je ne vois qu'une raison, à priori, pour qu'elle soit lente :

vous avez de nombreuses formules dans la ou les feuilles ?

Dans ce cas vous ajoutez après:

Code :

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

1
2
3
4
5
Dim i As Long, mv As Long, dl As Long

 With Application
 .Calculation = xlManual
  End With

et avant :

Code :

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

1
2
3
4
5
6
End Sub


With Application
.Calculation = xlAutomatic
End With

[ullan]

Bonjour,

C'est normal que cela ne marche pas !
Et pour deux raisons :

Dans la formule RECHERCHEV, feuille IMPORT, la plage de recherche est $A$2:$J$579 alors que dans la feuille IMPORT ACCESS la plage est $A$2:$J$639
Des formules qui renvoient #N/A se situent sous la ligne 579

Sous la feuille IMPORT ACCESS certaines cellules de la colonne A sont précédées d'une ' (apostrophe), donc format texte, bien que sous le menu Format / Cellule il y a Standard.
Pour y remedier :
copier une cellule vide
sélectionner la colonne A de la feuille IMPORT ACCESS
menu Edition / Collage spécial / addition / OK

En appliquant ces deux petites corrections tous les messages d'erreur ont disparu.

[vulcain91]

Bonjour,

C'est normal que cela ne marche pas !
Et pour deux raisons :

Dans la formule RECHERCHEV, feuille IMPORT, la plage de recherche est $A$2:$J$579 alors que dans la feuille IMPORT ACCESS la plage est $A$2:$J$639
Des formules qui renvoient #N/A se situent sous la ligne 579

Sous la feuille IMPORT ACCESS certaines cellules de la colonne A sont précédées d'une ' (apostrophe), donc format texte, bien que sous le menu Format / Cellule il y a Standard.
Pour y remedier :
copier une cellule vide
sélectionner la colonne A de la feuille IMPORT ACCESS
menu Edition / Collage spécial / addition / OK

En appliquant ces deux petites corrections tous les messages d'erreur ont disparu.

pour ce qui est de la plage de recherche je suis vraiment une buse, j'aurais du le voir moi même.

Par contre je trouve aucune apostrophe dans la colonne A de la feuille IMPORT ACCESS .
Ta methode du collage special marche bien mais me supprime ma liaison avec la requete Access, donc je vais essayer la macro de jacques_jean.

Merci de votre aide

@+

[vulcain91]

Re Vulcain91,

Cette macro, même pour plusieurs milliers de lignes ne devrait prendre que 2 ou secondes.

Je ne vois qu'une raison, à priori, pour qu'elle soit lente :

vous avez de nombreuses formules dans la ou les feuilles ?

Dans ce cas vous ajoutez après:

Code :

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

1
2
3
4
5
Dim i As Long, mv As Long, dl As Long

 With Application
 .Calculation = xlManual
  End With

et avant :

Code :

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

1
2
3
4
5
6
End Sub


With Application
.Calculation = xlAutomatic
End With

J'ai quelques formules en effet mais pas enormement par contre c'est une liaison access, c'est peut etre la raison de la lenteur d'excécution ?

J'ai pas compris comment je doit réecrire ma macro, désolé je suis nul en VBA.

Merci @+

[Invité]

Bonjour Vulcain91,

A toutes fins utiles (car d'après votre réponse ce n'est peut-être pas ce que je pensais, mais cela peut servir dans un autre cas) :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub Mef()
Dim i As Long, mv As Long, dl As Long
With Application
 .Calculation = xlManual
  End With
 
dl = Range("A65536").End(xlUp).Row
   For i = 2 To dl
  mv = Cells(i, 1)
   Cells(i, 1).ClearContents
   Cells(i, 1) = mv
Next i
 
With Application
.Calculation = xlAutomatic
End With
End Sub

[Invité]

En fonction des réponses de Ullan et de Random, je viens de regarder d'un peu plus près votre fichier.

1) vous dîtes qu'il contient quelques formules. S'il s'agit d'un extrait le nombre de formules sans être "énorme" est déjà quand même important d'autant plus que RECHERCHEV n'est pas la même chose que A2*B2. Cela pour expliquer le temps de traitement en calcul automatique.

2) pouvez-vous préciser un exemple de ce que vous considérez comme n'ayant pas fonctionné dans RECHERCHEV.

[vulcain91]

En fonction des réponses de Ullan et de Random, je viens de regarder d'un peu plus près votre fichier.

1) vous dîtes qu'il contient quelques formules. S'il s'agit d'un extrait le nombre de formules sans être "énorme" est déjà quand même important d'autant plus que RECHERCHEV n'est pas la même chose que A2*B2. Cela pour expliquer le temps de traitement en calcul automatique.

2) pouvez-vous préciser un exemple de ce que vous considérez comme n'ayant pas fonctionné dans RECHERCHEV.

en fait maintenant tous marche trés bien grace a votre macro et aux conseils d'Ullan

mais je comprend pas pour il faut aller dans les cellules et faire "entrée" a chaque fois, c'est un probleme d'import qui génére ce "bug" ?

En tous cas merci de votre aide a vous deux

[ullan]

Re,

En informatique, dans la plupart des cas, le bug se trouve entre la clavier et la chaise.

Il s'agit simplement d'une différence de format.
L'import est un format texte.
Le code dans la formule est un format nombre.

Je t'avais proposé de modifier le format texte en format nombre.
Tu m'as dit que cela n'est pas possible.
Donc, il suffit de faire le contraire : modifier le format nombre en format texte.

[Invité]

Re Vulcain91,

Comme vous le dit Ullan, vous importez un fichier texte.

Mais il n'existe pas qu'un seul type de fichier texte.

En général les logiciels de gestion de bases de données ont leur propre format mais il offrent également des possibilités d'exportation de fichiers permettant l'importation dans des formats "Standards" (*.txt, *.csv., *.asc) et il est préférable d'exporter les données dans un de ces types de fichiers avant de l'importer dans un autre logiciel.

En l'occurrence Excel ne sait pas traiter automatiquement les données numériques enregistrées en format texte alors que dans d'autres cas il le fait très bien.

Exemple :
-sur la feuille "Import" le N° de commande 60563348 se trouve dans une cellule au format "Standard" et s'affiche automatiquement à droite (affichage par défaut des nombres)

-ce même N° de commande, sur la feuille "Import Access", se trouve dans une cellule au même format et pourtant avec l'affichage par défaut du texte (à gauche).

-tant que la colonne n'a pas été retraitée (afficher les N° de commande sur "Import Access" au format nombre ou sur "Import" au format texte la fonction RECHERCHEV n'affecte pas les données (affichage de #N/A dans la cellule).

C'est un peu compliqué à expliquer et si jamais j'ai totalement ou partiellement tort, je pense qu'un plus grand spécialiste pourra mieux vous expliquer.

Cela dit vous écrivez :

mais je comprend pas pour il faut aller dans les cellules et faire "entrée" a chaque fois, c'est un probleme d'import qui génére ce "bug" ?

J'ose espérer que vous ne le faites plus manuellement ?

D'autre part dans votre exemple il apparaît dans certaines cellules de la feuille "Import" contenant la formule RECHERCHEV le résultat "#N/A" pour une autre raison que celle évoquée ci-dessus : votre plage de recherche n'inclus pas toute la plage contenue dans "IMPORT ACCESS".

On peut supposer que vous importez régulièrement cette base de données et que le nombre d'enregistrements varie d'une importation à l'autre.

Si c'est le cas vous pouvez nous le préciser, il existe différentes solutions permettant de ne pas être obligé de modifier la plage.