Copier une feuille sur un nouveau classeur

Bonjour tout le monde,

J'ai un problème, je travaille sur spotfire qui est un logiciel de datavisualisation. Certaines données que je dois utiliser sont sur un fichier EXCEL sur Sharepoint(URL) , or Spotfire ne peut les importer, il faut d'abord que je les copie en local.

Est il donc possible de faire une macro pour que la feuille d'un fichier situé sur le Sharepoint se copie sur un nouveau classeur en local?

Je vous remercie

Bonsoir

cette simple instruction VBA copie la feuille active en créant un nouveau classeur :

Sub LRD()
    ActiveSheet.Copy
End Sub

Ensuite il vous reste à gérer ce nouveau classeur pour le renommer et l'enregistrer.

@ bientôt

LouReeD

Bonjour,

Un exemple à adapter.

Cdlt.

Public Sub Tom79()
Dim strPath As String, strFilename As String
Dim p As Long
Const strPrefix As String = "Spotfire"
    With Application
        p = .SheetsInNewWorkbook
        .SheetsInNewWorkbook = 1
        'c:\Users\xxx\Documents\
        strPath = .DefaultFilePath & Application.PathSeparator
    End With
    strFilename = strPrefix & Format(VBA.Now(), "_yyyymmdd_hhmm") & ".xlsx"
    strFilename = strPath & strFilename
    ActiveSheet.Copy
    With ActiveWorkbook
        .SaveAs Filename:=strFilename, FileFormat:=51 '52 si Mac
        .Close savechanges:=False
    End With
    Application.SheetsInNewWorkbook = p
End Sub

Bonjour,

c'est plus complet, en effet !

@ bientôt

LouReeD

Bonjour,

et oui un tableau structuré vide, considère sa première ligne comme pleine !

Du coup on tape en dessous !

@ bientôt

LouReeD

Je vous remercie, ça fonctionne !!

Comme quoi il existe toujours des solutions !!

Encore merci

Thomaw