Recherche:

Avant toute chose merci pour ces essais...

Malheureusement Workbook_Open () n'est pas reconnu dans ma macro et je sais pas pour quelle raison...
En revanche, j'ai trouvé l'erreur concernant...

Je viens d'essayer :

DIM BOM as Workbook
SET BOM = Workbooks.open ()

Ce qui permet bien d'ouvrir le fichier mais ne permet pas pour autant d'exécuter la macro concernée.

Par ailleurs, sub...

Bonjour Tête de chat,

En fait dans le fichier "BOMCode.xlsm" où se trouve macro1 : "Loading", j'ai une procédure de type : Public Sub auto_open () qui doit exécuter la macro1 à l'ouverture du...

Bonsoir le Forum,

Je souhaiterai savoir comment activer une macro1 située dans un fichier Excel, via une macro2 située dans un second fichier Excel,

Nom du module de la macro1 :...

Un grand merci Mehnir!! Tu m'as donné une piste dans tes réponses..

Juste avant la ligne bloquante, j'ai ajouté :
Windows("Lancement_Fabrication.xlsm").Activate ...

Et ma variable est déclarée en tant qu'Option Explicit Dans un autre module
Public ManufacturingPartSupplierColumn As String 'Nom colonne Fournisseur

Je voulais dire que ma variable contenait que 10 caractères...

Je pense que le problème tourne autour du fait que le programme ne sait plus où aller chercher la feuille :
Worksheets("PièceAFabriquer") car en mode debogage lorsque j'affiche cette feuille qui...

Non, cette variable ne comporte pas plus de 10 caractères...

Bonjour,

Depuis ce matin je sèche sur une nouvelle difficultée concernant le code suivant :


Private Sub Supplier_Loading()

Dim ManufacturingPartRow As Integer, NumberPartRow As Integer,...

Finalement, aucune solution avec Excel. Je suis donc passé en Vba

Existe-t-il une solution pour accéder à des données dans un classeur excel fermé? ou reconstrruire un chemin réseau dans une recherche verticale sans utiliser la fonction INDIRECT()?

En fait, il me manquait la fonction INDIRECT pour rendre valide le chemin réseau:

...

Bonsoir,

Je cherche à reconstituer le chemin réseau dans une table matrice d'une recherche verticale car les données 158 Bobineuse GAG :et Code_Article_P158.xlsx peuvent évoluer fonction de la...

Mes liens Hypertextes pointent vers des fichiers de type .PDF ou .Xlsx. situés sur un serveur.

Voici le code utilisé pour la copy de mes données


Private Sub CopyData(ByVal NameFile As String)...

Bonjour,

Je souhaite copier un tableau excel, contenant des liens hypertextes, dans un autre fichier via VBA.
Lors de ce transfert tous mes liens hypertextes deviennent inactifs avec un message...

je viens de remplacer le code initial :

if WorksheetFunction.CountIf(ListObjects("T_BOM").Range,"#N/A") > 0 then
par :

If WorksheetFunction.CountIf(BOM.Sheets(1).ListObjects("T_BOM").Range,...

Bonjour halaster08,

Ma plage est en fait le tableau structuré : ListObjects("T_BOM")

Par conséquent, je ne vois pas comment transposer :
if WorksheetFunction.CountIf("taplage", "#N/A") > 0...

Petite rectification, ce code ne fonctionne pas systématiquement et sans raison apparente!

Peut être la valeur recherchée : #N/A ne convient pas? :calim2:

Bonjour,

Je souhaite vérifier si l'erreur #N/A est présente dans mon tableau T_BOM.

J'est rédigé le code suivant, qui à priori fonctionne, me renvoyant un message dès lors que #N/A existe.

...

Bonjour Phil Free,



Je ne vois pas d’inconvénient à utiliser AfterRefresh, mais jusque là je n'ai jamais utiliser ce code et ne connais pas réellement la syntaxe :(
Aurais tu un exemple à me...

Effectivement, lorsque la requête s'exécute un message apparaît dans la barre de "statut"! Mais je ne vois pas comment procéder avec un Do/Loop...

J'ai déjà essayé le DoEvents et cela ne change rien tout comme lancé le .RefreshAll dans une procédure Auto_Open () du fichier concerné...

Le fichier ISCALA_EXTRACT est un fichier Excel avec une...

Bonjour,

Je recherche une solution pour que mon programme attende que l'action .RefreshAll soit terminée avant de continuer.

L'action .RefreshAll permet aux requêtes situées dans mon fichier...

Bonsoir 78Chris,

Merci de ta réponse, ça fonctionne parfaitement ;)

Voici le code complet par rapport à mon exemple et le nom de mon tableau : T_ISCALA_ITEM


Public Sub OpenIscalaExtract()...