Notifikationer

Markér alle som læst Log ud

engberg Juniormester

24. marts 2003 - 16:27 Der er 4 kommentarer og
2 løsninger

Hent billede fra excel.

Jeg har et program der henter nogle informationer fra et excel-regneark - desværre kan jeg ikke få den til at hente billeder derfra også.

Muligvis skal billederne sættes ind i excel på en speciel måde eller????

Det jeg har prøvet er:

Set rs4 = conn.Execute("SELECT Billede FROM [Sheet1$]")

...... Længere nede ......

Image1.Picture = rs4(0)

Men rs4(0) er Null og får ltså ikke værdien af billedet med sig....

Mvh.
Engberg

Synes godt om

shadowdance Nybegynder

18. april 2003 - 19:54 #1

Jeg går ud fra at 'conn' i denne forbindelse er et WorkSheet objekt? Er du sikker på at du ikke bare kan bruge:

conn.Cells(cellerække,cellekolonne)

Måske er den klog nok til at returnere et objekt når der forekommer sådan et. Jeg ser også en lille fejl. Image-kontrollen skal have en anden type kode for at udskifte billedet:

Image1.Picture = Loadpicture(filename as string)

Kig under Loadpicture i Help.

Synes godt om

shadowdance Nybegynder

18. april 2003 - 19:56 #2

Ups, det var lidt forkert. Det er:

Set Image1.Picture = LoadPicture(filename as string)

Men jeg bliver i tvivl nu hvor der ikke er tale om en billedfil. Måske skal Loadpicture udelades, men jeg vil stadig mene at du skal bruge:

Set Image1.Picture = objekt

Synes godt om

engberg Juniormester

21. april 2003 - 12:05 #3

Det dur stadigt ikke..

I øvrigt kan jeg ikke få
conn.Cells(cellerække,cellekolonne) til at virke..

Set Image1.Picture = conn.Cells("14","g")
eller
Set Image1.Picture = conn.Cells(14,g)
eller
Set Image1.Picture = conn.Cells(g,14)
eller
Set Image1.Picture = conn.Cells("g","14")

Synes godt om

shadowdance Nybegynder

21. april 2003 - 20:34 #4

Nej, men du må heller ikke bruge "g"! Cells-funktionen accepterer kun tal, og derfor skal du skrive kolonnens nummer i rækken. G svarer altså til 7.

Synes godt om

engberg Juniormester

26. april 2003 - 17:36 #5

Det virker heller ikke, hvis jeg sætter:

Set Image1.Picture = conn.Cells("7","14")

eller

Set Image1.Picture = conn.Cells(7,14)

Synes godt om

engberg Juniormester

11. september 2003 - 13:53 #6

Er der ingen der kan hjælpe???

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic	5	29/08/202512:28	04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic	0	05/08/202510:10	-
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic	0	16/05/202512:31	-
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic	1	22/04/202514:55	25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic	12	10/07/202417:34	12/07/202414:34

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS