Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: andere cel  (gelezen 3976 keer)

0 leden en 1 gast bekijken dit topic.

Offline Sunnybat

  • Volledig lid
  • **
  • Berichten: 222
  • Geslacht: Man
  • Oplossing.be
andere cel
« Gepost op: 16 februari 2024, 18:06:21 »
Hoi,
ik heb deze code reeds gehad van Molly ( thnx )
maar ik had 1 klein vraagje

als er in range 7 ( kolom G ) tekst staat opent hij de JPG met deze tekst B.V foto dan vindt hij in de directory d:/covers/
foto.jpg en geeft deze weer
nu is de vraag als er in range 7 ( kolom G ) een streep staat - dat hij de tekst pakt die in range 8 ( kolom H ) staat

.foto.Picture = LoadPicture("D:\Covers\" & t_range(7) & ".jpg")
                'jpg

en vergeten te vermelden,zodra er wel tekst voorkomt in range 7 ipv - dan moet range 8 overgeslagen worden

Alvast weer super bedankt
Excel 365 NL

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.174
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: andere cel
« Reactie #1 Gepost op: 17 februari 2024, 10:45:32 »
Hallo Sunnybat,

Dat zou moeten kunnen met een eenvoudig if-statement:

If Cells(7, 7) = "-" then
.foto.Picture = LoadPicture("D:\Covers\" & t_range(7) & ".jpg")
Else
.foto.Picture = LoadPicture("D:\Covers\" & t_range(8) & ".jpg")
EndIf

Zonder de rest van de code te zien kan ik natuurlijk niet bepalen hoe je variabelen benoemd zijn.

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline Sunnybat

  • Volledig lid
  • **
  • Berichten: 222
  • Geslacht: Man
  • Oplossing.be
Re: andere cel
« Reactie #2 Gepost op: 17 februari 2024, 12:31:19 »
@SoftAid

zoals ik nu test werkt het perfect  \o/

alweer super bedankt
Excel 365 NL

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.174
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: andere cel
« Reactie #3 Gepost op: 18 februari 2024, 11:16:09 »
Hallo Sunnybat,

Bedankt voor de bevestiging  :thumbsup:

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline Sunnybat

  • Volledig lid
  • **
  • Berichten: 222
  • Geslacht: Man
  • Oplossing.be
Re: andere cel
« Reactie #4 Gepost op: 01 maart 2024, 11:55:24 »
Hoi,

ik had deze code reeds gehad maar helaas werkt het niet

If Cells(7, 7) = "-" then
.foto.Picture = LoadPicture("D:\Covers\" & t_range(7) & ".jpg")
Else
.foto.Picture = LoadPicture("D:\Covers\" & t_range(8) & ".jpg")
EndIf

als er in range 7 een - ( streep staat ) dan pak hij de informatie van range 8 dat werkt
maar als er informatie staat in range 7 BV 01008CB0156BC800 dan moet hij range 8 overslaan maar
hij zoekt toch de informatie van range 8 01008CB0156BC00 en die tekst vindt hij niet

Alvast super bedankt
Excel 365 NL

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.174
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: andere cel
« Reactie #5 Gepost op: 01 maart 2024, 13:47:03 »
Hallo Sunnybat,

ik heb (hopelijk zoals jij dat wil) je reactie hierboven bij het topic geplaatst waar het om ging, zo hebben de helpers toch war meer informatie.

Je melding:

Citaat
als er in range 7 een - ( streep staat ) dan pak hij de informatie van range 8 dat werkt
maar als er informatie staat in range 7 BV 01008CB0156BC800 dan moet hij range 8 overslaan maar
hij zoekt toch de informatie van range 8 01008CB0156BC00 en die tekst vindt hij niet

krijg ik niet ontward.

Wat mag er staan (of wat mag er niet staan) in cel "G7" opdat hij de foto ("D:\Covers\" & t_range(7) & ".jpg") laadt?

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline Della Jordan

  • Volledig lid
  • **
  • Berichten: 152
  • Geslacht: Vrouw
  • Hey, ik ben nieuw hier !
Re: andere cel
« Reactie #6 Gepost op: 01 maart 2024, 14:32:28 »
Misschien?
If Cells(7, 7) <> "-" then
Groetjes,Della

Offline Sunnybat

  • Volledig lid
  • **
  • Berichten: 222
  • Geslacht: Man
  • Oplossing.be
Re: andere cel
« Reactie #7 Gepost op: 01 maart 2024, 14:35:53 »
@SoftAid

Klopt dit is de topic

als er in range 8 een streep staat dan laat hij de jpg die als tekst staat in range 7 staat zien ( raar ) dan slaat hij de range 8 over waar een  streep staat
maar als in range 8 ook tekst staat dan moet hij ( als het mogelijk is  :-[) deze niet zoeken en overslaan maar dan krijg ik een melding en zie de jpg niet
BV
range 7 0100C88016CF6000 en range 8 - ( laat die de jpg van 0100C88016CF6000 zien )
range 7 - en range 8 0100C88016CF6800 dan laat die de jpg van 0100C88016CF6800 zien
range 7 0100C88016CF68000 en range 8 0100C88016CF6000 dan krijg ik een melding en zie ik geen jpg

Alvast weer super bedankt



Excel 365 NL

Offline Sunnybat

  • Volledig lid
  • **
  • Berichten: 222
  • Geslacht: Man
  • Oplossing.be
Re: andere cel
« Reactie #8 Gepost op: 01 maart 2024, 14:39:55 »
@Della Jordan

helaas

         If Cells(7, 7) <> "-" Then
                 .foto.Picture = LoadPicture("D:\Covers\" & t_range(7) & ".jpg")
                 Else
                 .foto.Picture = LoadPicture("D:\Covers\" & t_range(8) & ".jpg")
                 End If
Excel 365 NL

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.174
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: andere cel
« Reactie #9 Gepost op: 01 maart 2024, 14:42:59 »
Sunnybat,

Je bent echt niet duidelijk in je commentaren en voorbeelden.

Begin met een voorbeeldbestandje te maken, en hang dat aan bij een antwoord, waarin je veel duidelijker dan nu uitlegt wat je wil bereiken, en wat te volgen is in je voorbeeldbestand.

Anders blijven we raden naar wat je wilt.

Akkoord?

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline Sunnybat

  • Volledig lid
  • **
  • Berichten: 222
  • Geslacht: Man
  • Oplossing.be
Re: andere cel
« Reactie #10 Gepost op: 01 maart 2024, 15:07:26 »
@SoftAid

als er in range 7 ( kolom G ) de tekst hallo staat dan vindt hij op D:\Covers de hallo.jpg en laat die zien en in range 8 ( kolom H ) staat een -

als er in range 7 ( kolom G ) een streep staat - en in range 8 ) kolom H ) hoi dan laat die hoi.jpg zien

MAAR zodra in range 7 ( kolom G ) hallo staat en in range 8 ( kolom H ) hoi dan geeft die een melding en zie ik geen jpg want hij vindt deze niet in range 8 ( Kolom H )

nu zou ik graag zodra in range 7 ( kolom G ) hallo voorkomt en in range 8 ( kolom H ) hoi, dat hij de jpg laat zien van range 7 ( kolom G ) hallo laat zien
en hoi over slaat :'(
hoop dat ik het nu een beetje beter verwoord hebt?







Excel 365 NL

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.174
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: andere cel
« Reactie #11 Gepost op: 01 maart 2024, 15:23:23 »
Ik heb je uitleg proberen samen te vatten in begrijpbare (Excel) taal, maar dat maakt het niet gemakkelijker.

Citaat
Als er in cel "G7" de tekst "hallo" staat en in "H8" een "-" staat, dan vindt hij op D:\Covers\ de hallo.jpg en laat die zien.
Als er in "G7" een "-" staat  en in "H8" staat "hoi" dan laat die hoi.jpg zien.
Maar zodra in "G7" "hallo" staat en in "H8" "hoi" dan geeft die een melding en zie ik geen jpg want hij vindt deze niet in "H8"
Nu zou ik willen dat als in "G7" "hallo" staat en in H8 "hoi", dat hij de jpg van "G7" ("hallo") laat zien en "hoi" over slaat.

Citaat
dan geeft die een melding
Welke melding?

Waarom kom je niet met een voorbeeldbestand?

PS: Zonder je volledige VBA code stopt het voor mij  :(

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline Sunnybat

  • Volledig lid
  • **
  • Berichten: 222
  • Geslacht: Man
  • Oplossing.be
Re: andere cel
« Reactie #12 Gepost op: 01 maart 2024, 16:44:00 »
@SoftAid

even allles moeten deleten anders is die super groot

het gaat om kolom G en Kolom V


Excel 365 NL

Offline Della Jordan

  • Volledig lid
  • **
  • Berichten: 152
  • Geslacht: Vrouw
  • Hey, ik ben nieuw hier !
Re: andere cel
« Reactie #13 Gepost op: 01 maart 2024, 17:39:38 »
@ Sunnybat,
Ik heb het bestand eens grondig bekeken, alles kan een heel stuk makkelijker.
Maar ik begrijp wat je wilt bereiken, nu ik erachter ben wat t_range betekend, maakt het al een stuk duidelijker. (Alles aanpassen neemt een paar dagen in beslag)Ik werk in ploegen.
Doe mij een plezier, vul eens 2 lijntjes in in je nu leeg voorbeeldbestand.
Dan hebben de helpers een overzicht, wat is tekst, cijfers enz.







Groetjes,Della

Offline Sunnybat

  • Volledig lid
  • **
  • Berichten: 222
  • Geslacht: Man
  • Oplossing.be
Re: andere cel
« Reactie #14 Gepost op: 01 maart 2024, 19:27:37 »
@Della Jordan

als je nu zoek klikt en vult in de bovenste textbox test in, dan komt er in de grote textbox de tekst wat je zoekt
klik op de tekst wat je zoek ( test )  dan zie je de melding wat ik bedoel

zorg wel dat je kolom G en V de directory op je HDD staat en kolom J een datum staat anders werkt het niet

BV c:\jpg\
dan de naam van je ingevulde naam in kolom G ( c:\jpg\test.jpg of wat je zelf invuld )
Excel 365 NL

 


www.combell.com