macro : bitmap d'une section

fr-users
#1

Bonjour à tous.

Je cherche, par macro, à :
- créer une section (ça, j'y arrive).
- y mettre un fond bitmap de mon crû (ça, je n'y arrive pas).

Voilà ma macro actuelle (simplifiée - ch contient l'image, et est dans
le même répertoire que le document) :

function section3(dc,cs)

  Dim sec as object
  Dim ch as string

  ch="lignecahier.jpg"
  sec=dc.createInstance("com.sun.star.text.TextSection")
  masection.backgraphicURL=ConvertToURL(ch)
  
End function

Quelqu'un a-t-il une idée, ou un exemple qui me permettrait d'avancer ?
J'ai chercher sur internet sans trouver.

Merci d'avance.

Cordialement,
O.J.

#2

Bonjour
Pourquoi 2 variables sec et masection ?

Utiliser la même me semblerait plus judicieux.

Bonne journée

#3

Bonjour
Pourquoi 2 variables sec et masection ?

Utiliser la même me semblerait plus judicieux.

Bonjour,
Oui, une erreur en voulant simplifier le code initial, pour la liste.
C'était bien le même nom dans ma macro.
Cordialement,
O.J.

#4

Autre piste

Pas trop sûr de moi, mais il me semble que les fonds (pages, section, …)
sont des bitmap, pas des jpg.
Avez-vous essayer « à la main » ?

à voir

#5

Autre piste

Pas trop sûr de moi, mais il me semble que les fonds (pages, section,
…) sont des bitmap, pas des jpg.
Avez-vous essayer « à la main » ?

à voir

Bonjour,
Merci, déjà, pour les suggestions.
Cela dit, j'ai essayé en bmp, mais même pb : une section créée, mais
pas d'image de fond.
Je pense que je m'y prends mal au niveau des la macro (et, à la main,
en passant par format-> section->option-> add/import ..., avec le même
fichier, ça marche, bien sûr).
Cordialement,
O.J.

#6

Bonjour,

J'ai un doute concernant l'utilisation de ConvertToURL, il me semble que cette fonction attend une adresse complète et pas seulement le nom du fichier.

Mais j'avoue n'avoir jamais testé ce "raccourci" si le document est dans le même répertoire.