Discussion :

[oscar.cesar]

bonjour
j'arrive pas à trouver comme on peut rendre une frame transparente ??


merci

[SilkyRoad]

bonjour

j'espère que ce lien pourra t'aider

http://excel.developpez.com/sources/...ameTransparent


bonne journée
michel

[ucfoutu]

Bonjour,

Reste que le code de ce lien ne concerne que l'image de fond (et pas les contrôles éventuellement existants derrière le Cadre).

La chose (image + contrôles) est réalisable sous VB6 ...
Je vais voir dans la journée (sur mon portable où j'ai Excel) si je peux écrire pour VBA ce que j'ai écrit pour VB.

(je rencontrerai peut-être un problème de hwnd du Frame....)

[oscar.cesar]

bonjour
l'exemple est interessant.
J'ai repris le code mais je comprends pas la partie ci-dessous surtout au niveau .......me, image1 ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
 Frame_Transparent Frame1, Me, Image1

repris dans l'ensemble du code l'exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
 
 
 
Private Sub UserForm_Initialize()
  Frame_Transparent Frame1, Me, Image1
End Sub
 
 
Private Sub Frame_Transparent(cadre As Frame, f As UserForm, imaj As Image)
 
  cadre.BorderStyle = 0
' cadre.ZOrder 'peut être supprimé si inconnu sous VBA
  cadre.BackColor = f.BackColor
'  imaj.ZOrder 1 'peut être supprimé si inconnu sous VBA
  imaj.Picture = f.Picture
  imaj.Move -cadre.Left, -cadre.Top, f.Picture.Width, f.Picture.Height
End Sub

merci de votre aide

[ucfoutu]

Me et image1 sont deux des trois paramètres envoyés à la procédure !

Me, c'est ton UserForm
Image1, c'est ton image de fond ...

Edit :
Ceci étant dit (revoir l'un de mes messages plus haut) :

1) je n'aime pas vraiment ce code. Il avait été écrit pour VB6 (et "aménagé" pour VBA...) pour ne traiter que la transparence par rapport à une image de fond.
2) je suis persuadé de ce que l'on peut faire beaucoup mieux (me relire), ce que j'ai déjà fait sous VB6... et qu'il me faudra tenter de transposer pour VBA... après avoir résolu un problème de handle sous VBA, ce à quoi il me reste donc à m'atteler dès que j'en aurai le temps

[oscar.cesar]

bonjour
pour l'image1 ,j'ai une erreur du type Variable non definie.
mon image de fond est present(propriete PICTURE)?
Pour mon Image , faut il mettre le nom reel de image ou ce nom IMAGE1 est elle standard ?

[patbou]

bonsoir,

pour rendre une userform transparente

http://www.developpez.net/forums/sho...ghlight=handle

pour une frame , je pense qu il faut recuperer le handle de la frame puis appliquer la procedure du liens cité en haut du message

pour avoir la valeur du handle d un bouton ou autre objet d une userform
il faut utiliser l api

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Public Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, _
ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long

[ucfoutu]

Non !

Juste NON !

on ne traitera pas le Frame comme une Form !

Et on n'utilisera pas de layers ...

Je vais m'y mettre... patience ...

[oscar.cesar]

bonsoir

debat de specialiste,je suis perdu!

[patbou]

bonsoir,

apres avoir recherché sur le forum et sur le net

apparement on ne peut pas recupérer le handle des controles( d une userform) crées a l aide de la boite à outil vba .


je vais essayé avec la fonction apigetfocus qui a donnée un resultat probant
lors de cette discussion

http://www.developpez.net/forums/sho...d.php?t=248842

[ucfoutu]

Bonjour,

Heu...

Je vois mal comment pn pourrait donner le focus à un Frame ...

Impossible sous VB6 ... je vais voir avec VBA !!!!

EDIT : oui, on peut donner le focus à un Frame sous VBA !!! (pas sous VB6)...

Mais c'est pour moi de mauvaise augure...

Je dois passer à table .
Essaye le code du lien et dis nous si tu obtiens autre chose que 0

Merci ...