Excel & VBA

[Pharmacos]

Bonjour à tous !!

Je suis en train de faire une macro sous excel me permettant de traiter des données.

Cependant j'aimerais exporter mes données sous forme de fichier .html.......
mais alors la je ne sais pas du tout quoi faire !!!

Quelqu'un peut il m'aider .
Merci d'avance :zen:

 

[da capo]

Voilà un morceau de code à adapter :

    With ActiveWorkbook.WebOptions
        .WebPageTitle = "titre"
        .WebPageKeywords = ""
        .AllowPNG = True
        .ScreenSize = msoScreenSize1024x768
        .PixelsPerInch = 72
        .Encoding = msoEncodingMacRoman
    End With
    With Application.DefaultWebOptions
        .UpdateLinksOnSave = True
        .AlwaysSaveInDefaultEncoding = False
    End With


    ActiveWorkbook.SaveAs Filename:= _
        "Ordinateur:Users:login:Desktop:Feuil1.htm", FileFormat:=xlHtml, _
        PublishOption:=xlSheet

 

[Pharmacos]

Merci bien.

j'ai juste un problème,
c'est qu'il me dit qu'il ne connait pas le fichier feuil1.htm
car il est en lecture seule et il ne me le crée pas
Estce normal ??

 

[da capo]

tu as bien personnalisé le chemin ?
càd remplacé Ordinateur par ton nom de volume local et login par le nomd'utilisateur.

 

[Pharmacos]

Voui voui mais il me dit ca :

 

[da capo]

j'ai l'impression qu'il y a des espaces de part et d'autres des éléments du chemin que tu as écrit.

 

[Pharmacos]

C'est bon j'ai trouvé !!!!!

En effet il y avais des espaces, et aussi après filename un underscore qu'il fallait enlever

Merci beaucoup starmac pour ton aide

Et a propos les weboptions je peux les trouver ou ???

 

[da capo]

Et a propos les weboptions je peux les trouver ou ???

C'est à dire ?
Là à priori toutes les options sont présentes dans l'exemple donné.

Si tu cherches une option particulière, le plus simple est d'enregistrer une macro durant laquelle tu choisis les paramètres voulus, puis tu vas voir dans l'éditeur VB pour connaitre la valeur passée.

 

[Pharmacos]

Hello

Je parlais de ca : ActiveWorkbook.WebOptions

C'était pour savoir si il y en avait d'autre à régler.
Mais bon si tout y est.

Encore merci pour tout

@++
Pharmacos
:zen: