< návrat zpět

MS Excel


Téma: Vložený obrázek na pozadí rss

Zaslal/a 14.12.2011 13:27

Dobrý den,

používám pro vložení obrázku po kliknutí tento kod:

Private Sub Image2_Click()
On Error Resume Next
Dim umisteni As String
umisteni = Application.GetSaveAsFilename("C:\", , , "Najdi obrázek nebo zadej cestu")
If umisteni <> "" Then
Image2.Picture = LoadPicture(umisteni)
End If


A potřeboval bych po tom, co obrázek vložím na něj přesunout textové pole, to však vždy zmizí za obrázkem, potřeboval bych aby vložený obrázek byl vždy v pozadí. Můžete mi někdo prosím pomoci, jak toho dosáhnu?

Děkuji

Zaslat odpověď >

icon #006696
Poki
Musite vkladat textove pole z prvku ActiveX (protoze i obrazek pouzivate z prvku ActiveX)
U tech pak neni problem presunout nektery prvek do popredi, resp. do pozadi...citovat
#006697
avatar
Děkuji a lze nějak nastavit ActiveX textové pole jako průhledné? Respektive jen viditelný text?citovat
icon #006698
Poki
Jo, to jde.
Musite ve vlastnostech prvku nastavit:
1) BackStyle: 0 - fmBackStyleTransparent
2) BorderStyle: 0 - fmBorderStyleNonecitovat
#006708
avatar
To mi právě funguje, ale pouze do doby, kdy nastavím, že se textové pole rovná obsahu nějaké buňky a poté zmizí položka "Vlastnosti" a pozadí zůstane bílé nezměnitelné.

Nevíte, jestli to poté jde nějak nastavit? Děkuji moccitovat
icon #006709
Poki
Mne to funguje normalne, viz priloha...
Příloha: zip6709_textboxaobrazek.zip (28kB, staženo 67x)
citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje