Résultats de la recherche

Bonjour à tous, J'ai bidouillé un code pour qu'un fichier excel qui m'est envoyé sur ma boite mail soit traité pour avoir un récap des données de ce fichier par mail. Le but est d'avoir un récap par mail du nombre de palette et du poids des palettes par pays et par SHIP_VIA. Je vous met en PJ...

D'accord, je vous joins ce fichier test avec ce que je souhaite en dans l'onglet TCD. Je souhaiterais donc sélectionner dans le TCD les données qui sont présentes dans l'onglet DATA. En espérant avoir été plus clair.

Bonjour à tous, Je cherche a effectué une macro qui sélectionne plusieurs valeurs voici ce que j'ai trouvé, mais la macro filtre les éléments un part un et ce n'est pas ce que je cherche: Sub CreerTCD() Dim wbk As Workbook Dim PTCache As PivotCache Dim PTable As PivotTable Dim...

Non plus

Je souhaite vérifier l'existence d'un dossier pour pouvoir ensuite enregistrer un fichier: Si dossier existant on enregistre le fichier. Sinon on créait un dossier via la macro puis on enregistre le fichier... Merci.

Bonjour les experts, Il y a t-il une formule sous VBA pour vérifier l'existence d'un dossier sur sharepoint ? Cordialement.

On dirait bien que j'ai pas le choix.

Le soucis c'est que le nom de mon fichier à une partie variable ...

chem_macro= "https://sociallconnect.sharepoint.com/sites/FR-Agence/Administratif/1 - ADMINISTRATIF/4 - Reporting facturation clients/2023/0523/" Nomfichier = "*Statistique*.xlsx" Workbooks.Open Filename:= _ chem_macro & Dir(chem_macro & Nomfichier) comme ceci? Ca ne fonctionne pas non plus

Bonjour à tous, Je souhaiterai que ma macro ouvre un fichier qui se situe sur le SharePoint. Le problème que je rencontre est que le nom du fichier est variable. J'ai codé ceci la macro fonctionne sur mon bureau mais pas sur le sharepoint. chem_macro = ThisWorkbook.Path & "\" wbkmacro =...

L'arborescence existe bien.

Le dernier code me donne un message d'erreur fichier introuvable

Bien sûr.

Bonjour, J'ai ma macro qui plante du jour au lendemin avec un message d'erreur "Erreur d'exécution '1004': La méthode 'saveas' de l'objet '_workbook' a échoué. Voici mon bout de code si quelqu'un peut m'aider. Car, la je sèche ... Workbooks.Open Filename:= _ "" & chem_macro &...

Je pense avoir compris ou est le problème. Le bureau du pc est sur Onedrive c'est pour cette raison que ca ne fonctionne plus.

Bonjour, Elle sort de la macro principale qui fait appel à celle-ci voir ci-dessous: Public AGE As String, DAT As String, REFCGT As String, REFESSERS As String, UM As String, TabUM As Variant Private Sub Application_NewMailEx(ByVal EntryIDCollection As String) 'Declaration des variables Dim...

Re, test = vide ...

J'ai Ubound(UM)=3

Bonjour, Oui pour le point d'arrêt. En mettant le stop sur la ligne de code : lg = XlClas.Sheets(2).Range("A1").End(xldown).Row + 1 la macro après le code suivant: Set XlClas = XlApp.Workbooks.Open(Fichier) passe à End sub directement. vba Outlook pour traiter un fichier excel oui. Pour faire...

Ma macro passe directement à end sub après Set XlApp = CreateObject("Excel.Application")