Insertion d'image vraiment étrange...

Fred0o

XLDnaute Barbatruc

• 13 Novembre 2011

• #2

Re : Insertion d'image vraiment étrange...

Bonsoir morest,

Je ne traiterais pas ton problème car sur ma confirg : EXCEL 2003 sous Windows XP, cela fonctionne très bien. + de 30 fois testé et + de 30 fois les 4 images.

A+

 

Vote positif 0 Vote négatif

M

morest

XLDnaute Occasionnel

• 13 Novembre 2011

• #3

Re : Insertion d'image vraiment étrange...

Merci toutefois d'avoir répondu😛.

Ca voudrais dire que sur une config moins puissante ça peu ramer et faire que des éléments interfère entre eux. Faudrait que j'arrive à alléger le code alors mais comment 😛. A voir.

 

Vote positif 0 Vote négatif

Fred0o

XLDnaute Barbatruc

• 13 Novembre 2011

• #4

Re : Insertion d'image vraiment étrange...

Re-bonsoir,

Voici comment écrire ton code pour le simplifier :

VB:

Private Sub UserForm_Initialize()
    Dim f(4)
    Application.ScreenUpdating = False
    For i = 1 To 4
        f(i) = ActiveWorkbook.Path & "\Image" & i & ".jpg"
        With Sheets("T11")
            L = .Shapes("Image" & i).Width
            H = .Shapes("Image" & i).Height
            Set cht = .ChartObjects.Add(0, 0, L, H)
            .Shapes("Image" & i).Copy
            With cht.Chart
                .Paste
                .Export f(i), "jpg"
            End With
            cht.Delete
        End With
        Me.Controls("Image" & i).Picture = LoadPicture(f(i))
        Kill f(i)
    Next
    Application.ScreenUpdating = True
End Sub

A+

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 14 Novembre 2011

• #5

Re : Insertion d'image vraiment étrange...

Bonsoir,

Sur 2007 j'ai déjà eu des pb avec le contrôle image (pas du même type, et sur une feuille), bug signalé chez microsoft où ils conseillaient d'utiliser une forme (rectangle) avec l'image en fond.
Tu ne peux pas mettre de forme sur un userform mais un cadre (frame) accepte une image en fond.
A tenter peut-être... 🙂

Je ne pense pas à un pb de ressources, j'ai un 4 coeurs et j'ai contasté le défaut sur 2010.

eric

 

Vote positif 0 Vote négatif

M

morest

XLDnaute Occasionnel

• 14 Novembre 2011

• #6

Re : Insertion d'image vraiment étrange...

Ok j'regarderai cette simplification. Merci.

 

Vote positif 0 Vote négatif

M

morest

XLDnaute Occasionnel

• 3 Décembre 2011

• #7

Re : Insertion d'image vraiment étrange...

Salut,

La simplification marche nikel, merci beaucoup. Ca évite d'avoir un code à rallonge. Par contre le problème des images qui s'affiche pas toujours en totalité subsiste. J'ai bien essayer les frames ça avait l'air de fonctionner mais le bug recommence.

D'autres suggestions peut-être ?
Merci encore.

Edit : Je viens d'essayer d'afficher les images dans un commandbutton et une textbox ça s'affiche mais toujours le même problème. Ce qui est bizarre c'est que ces 3-4 derniers jours le problème semblait avoir disparu sans que je fasse particulièrement quelques chose.

 

Dernière édition: 3 Décembre 2011

Vote positif 0 Vote négatif