abonnement Unibet Coolblue
pi_94465831
quote:
17s.gif Op dinsdag 22 maart 2011 11:57 schreef Puckzzz het volgende:
Hoi Deetch.

Ontzettend bedankt voor je bestandje met de macro erin. Het lukt redelijk.
Wat er niet lukt is het feit dat ik 'm als sjabloon opsla (dan heb ik de datum en tijd uit de cel gehaald) en als ik dan de sjabloon weer open vult hij niet automatisch de datum en tijd weer in.

Ik nie snap nie....
ik blijf editen :') Dit doet ie inmiddels goed :)

Oh en nog een vraagje. Als ik nu het sjabloon opnieuw open geeft hij het d.m.v. een volgnummer een nieuwe naam. Is er aan manier om dat naar eigen wens aan te passen? Eventueel bij het opslaan? Zodat ie 'm wegschrijft in een bepaalde map met bijvoorbeeld de naam: Venray-52148-Naam monteur.xls

Al die informatie staat in het bestand dus daar zou het dan naar moeten verwijzen tijdens het opslaan.
Je kunt code toevoegen aan waar nu de worksheet open code ook staat. Dus rechtsklikken op je tabje en dan view code This workbook

1
2
3
4
5
6
7
8
9
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
   Dim opslagnaam As String
   
   opslagnaam = "C:\Data\Temp\" & Range("B5").Value & "-" & Range("B6").Value & "-" & Range("B7").Value
   opslagformaat = 56

   ActiveWorkbook.SaveAs opslagnaam, opslagformaat
   ActiveWorkbook.Saved = True
End Sub
Wat de code doet is de gegevens uit cel B5, B6 en B7 samenvoegen en er een directory mapnaam voor zetten. B5 = plaats, B6 = volgnummer en B7 is monteur

Op het moment dat de bonmaker het bestand wil opslaan wordt het bestand automatisch opgeslagen in excel97-2003 format (opslagformaat is 56)
Als je wilt opslaan in standaard 2007 formaat dan verander je de 56 in 50.

Vervolgens krijgt de monteur het standaard opslaan venster en kan hij zelf ook nog kiezen voor een locatie om op te slaan. Dit gebeurt in het standaard formaat waarin de excel van de monteur is geconfigureerd.
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
  dinsdag 22 maart 2011 @ 15:25:28 #177
1592 Puckzzz
Bitch please!
pi_94468866
quote:
1s.gif Op dinsdag 22 maart 2011 13:46 schreef Deetch het volgende:

[..]

Je kunt code toevoegen aan waar nu de worksheet open code ook staat. Dus rechtsklikken op je tabje en dan view code This workbook

[ code verwijderd ]

Wat de code doet is de gegevens uit cel B5, B6 en B7 samenvoegen en er een directory mapnaam voor zetten. B5 = plaats, B6 = volgnummer en B7 is monteur

Op het moment dat de bonmaker het bestand wil opslaan wordt het bestand automatisch opgeslagen in excel97-2003 format (opslagformaat is 56)
Als je wilt opslaan in standaard 2007 formaat dan verander je de 56 in 50.

Vervolgens krijgt de monteur het standaard opslaan venster en kan hij zelf ook nog kiezen voor een locatie om op te slaan. Dit gebeurt in het standaard formaat waarin de excel van de monteur is geconfigureerd.
Hij heeft een probleem met de opslagnaam: "C:\Data\Temp\"
Ikw erk op een server dus ik denk dat het daar aan ligt? kan ik niet rechtstreeks verwijzen naar de map waar het bestand in moet komen? dat is toch altijd dezelfde map.

Edit: volgens de foutopsporing gaat er hier iets niet goed:
ActiveWorkbook.SaveAs opslagnaam, opslagformaat

[ Bericht 4% gewijzigd door Puckzzz op 22-03-2011 15:37:36 ]
Hey! Het is OK om alleen je eerste twee teennagels te lakken als je van plan bent peeptoes te gaan dragen!
pi_94469038
quote:
1s.gif Op dinsdag 22 maart 2011 13:44 schreef DaFan het volgende:
=istext() geeft al true of false terug dus de IF is niet nodig'
ah thanks :)
pi_94471262
die
quote:
17s.gif Op dinsdag 22 maart 2011 15:25 schreef Puckzzz het volgende:

[..]

Hij heeft een probleem met de opslagnaam: "C:\Data\Temp"
Ikw erk op een server dus ik denk dat het daar aan ligt? kan ik niet rechtstreeks verwijzen naar de map waar het bestand in moet komen? dat is toch altijd dezelfde map.

Edit: volgens de foutopsporing gaat er hier iets niet goed:
ActiveWorkbook.SaveAs opslagnaam, opslagformaat
De tekst "C:\Data\Temp\" kun je naar believen aanpassen naar de gewenste mapnaam (incl. schijfnaam)
Je krijgt de foutmelding omdat die map C:\data\temp waarschijnlijk niet bestaat.

Ik neem aan dat je de celverwijzingen ook naar jouw situatie hebt aangepast?
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
  dinsdag 22 maart 2011 @ 17:05:05 #180
1592 Puckzzz
Bitch please!
pi_94472593
quote:
1s.gif Op dinsdag 22 maart 2011 16:30 schreef Deetch het volgende:
die

[..]

De tekst "C:\Data\Temp" kun je naar believen aanpassen naar de gewenste mapnaam (incl. schijfnaam)
Je krijgt de foutmelding omdat die map C:\data\temp waarschijnlijk niet bestaat.

Ik neem aan dat je de celverwijzingen ook naar jouw situatie hebt aangepast?
Ik heb hem aangepast naar dit:
quote:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim opslagnaam As String

opslagnaam = " Z:\Project\Service en onderhoud\Storingen\ " & Range("B5").Value & "-" & Range("B6").Value & "-" & Range("B35").Value
opslagformaat = 56

ActiveWorkbook.SaveAs opslagnaam, opslagformaat
ActiveWorkbook.Saved = True
End Sub
Maar ik blijf een foutmelding krijgen -O-
Hey! Het is OK om alleen je eerste twee teennagels te lakken als je van plan bent peeptoes te gaan dragen!
  dinsdag 22 maart 2011 @ 17:49:54 #181
62215 qu63
..de tijd drinkt..
pi_94474199
quote:
17s.gif Op dinsdag 22 maart 2011 17:05 schreef Puckzzz het volgende:

[..]

Ik heb hem aangepast naar dit:

[..]

Maar ik blijf een foutmelding krijgen -O-
Er zit een spatie voor Z:\, misschien kan het daar aan liggen?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_94477966
En erna, mapnamen mogen niet met een spatie beginnen.
pi_94483342
quote:
1s.gif Op maandag 21 maart 2011 13:55 schreef ProblemExcel het volgende:
Hallo FOK collega's

Ik heb de volgende vraag,

In excel Heb ik 2 checkboxjes, Het volgende moet gebeuren als de 1ste is aangevinkt en ik vink de andere aan moet de 1ste uitgaan hoe krijg ik dit voor elkaar, ik heb al wat tijd in gestoken om het te vinden maar niks gevonden

Groetjes Problemexcel

Ps. ik gebruik excel 2007 nl versie
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub CheckBox1_Click()

If CheckBox1.Value = True Then
    CheckBox2.Value = False
End If

End Sub

Private Sub CheckBox2_Click()

If CheckBox2.Value = True Then
    CheckBox1.Value = False
End If

End Sub
Kan je niet beter Radiobuttons gebruiken dan?
pi_94500092
quote:
7s.gif Op dinsdag 22 maart 2011 20:43 schreef DaFan het volgende:

[..]
[ code verwijderd ]

Kan je niet beter Radiobuttons gebruiken dan?
Bedankt ^O^

En idd lijkt me mischien beter om radiobuttons voor in de plaats te gebruiken
  woensdag 23 maart 2011 @ 10:04:40 #185
1592 Puckzzz
Bitch please!
pi_94501435
quote:
1s.gif Op dinsdag 22 maart 2011 17:49 schreef qu63 het volgende:

[..]

Er zit een spatie voor Z:\, misschien kan het daar aan liggen?
Het lag aan de spaties. Werkt nu perfect! Thnx iedereen :*
Hey! Het is OK om alleen je eerste twee teennagels te lakken als je van plan bent peeptoes te gaan dragen!
pi_94507842
quote:
17s.gif Op woensdag 23 maart 2011 10:04 schreef Puckzzz het volgende:

[..]

Het lag aan de spaties. Werkt nu perfect! Thnx iedereen :*
^O^
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
pi_94513121
Hallo

Ik zit nu met het volgende probleem, Ik heb 3 cellen Naam Aantal en prijs, en de 2 checkboxjes, als ik de 1ste checkboxje aanvinkt moet de informatie van de 3 cellen in sheet 2 te komen te staan en als ik de andere aanklikt moet die in sheet 3 komen, enig idee hoe ik dat voor elkaar krijg?

groetjes ProblemExcel
  woensdag 23 maart 2011 @ 15:38:07 #188
62215 qu63
..de tijd drinkt..
pi_94513377
quote:
1s.gif Op woensdag 23 maart 2011 15:32 schreef ProblemExcel het volgende:
Hallo

Ik zit nu met het volgende probleem, Ik heb 3 cellen Naam Aantal en prijs, en de 2 checkboxjes, als ik de 1ste checkboxje aanvinkt moet de informatie van de 3 cellen in sheet 2 te komen te staan en als ik de andere aanklikt moet die in sheet 3 komen, enig idee hoe ik dat voor elkaar krijg?

groetjes ProblemExcel
Wat heb je zelf al geprobeerd?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_94516508
Heb al zelf geprobeerd met hyperlink en met de informatie zelf erin iets te linken dat lukt wel maar langs checkbox wil het maar niet lukken
pi_94516575
Probeer het maar eens met google. Ik heb je antwoord zo gevonden.
'Expand my brain, learning juice!'
<a href="http://www.last.fm/user/crossover1" rel="nofollow" target="_blank">Last.fm</a>
  woensdag 23 maart 2011 @ 17:13:55 #191
62215 qu63
..de tijd drinkt..
pi_94517309
quote:
1s.gif Op woensdag 23 maart 2011 16:54 schreef ProblemExcel het volgende:
Heb al zelf geprobeerd met hyperlink en met de informatie zelf erin iets te linken dat lukt wel maar langs checkbox wil het maar niet lukken
Hyperlink? Je bedoelt de functie =hyperlink()? Dan zou ik de omschrijving daarbij nog maar eens goed lezen. Daarnaast, als je checkboxes gebruikt zal je wel VBA nodig hebben om het te laten werken dus dan zou =hyperlink toch al niet werken.

Welke code heb je nu gebruikt?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_94568378
quote:
1s.gif Op zondag 20 maart 2011 18:43 schreef Lorne het volgende:
Klinkt inderdaad niet echt heel handig :-)

Wacht nog even mrexcel af. Ben benieuwd.
De reply die je hebt gekregen is hetzelfde als ik gaf, names geven aan alle ranges per persoon.
Kan natuurlijk wel een Change event, dat wel.
pi_94730792
Hallo, ik hoop dat jullie mij kunnen helpen.
Kan via de zoekfunctie/google er helemaal niks over terugvinden...

Taal: Nederlands
Versie: 2007

Goed, ik heb meerdere tabbladen in één excel bestand. En op het eerste tabblad wil ik graag een snelkoppeling/hyperlink om bijvoorbeeld tabblad 2 af te drukken (alleen het afdrukbereik wat ik op tabblad 2 heb aangegeven, maar ik ga ervan uit dat hij dit automatisch doet).
En zo ook een snelkoppeling/hyperlink om alléén tabblad 3 af te drukken, etc, etc.

Wie kan mij helpen?
pi_94820863
Kun je dit niet als macro opnemen en die macro aan een button koppelen?
Waar loop je dan nog tegenaan?
pi_94844121
quote:
1s.gif Op woensdag 30 maart 2011 19:18 schreef hendrik2009 het volgende:
Kun je dit niet als macro opnemen en die macro aan een button koppelen?
Waar loop je dan nog tegenaan?
waarschijnlijk niks. Goed advies lijkt me.
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
pi_94933769
Inderdaad topadvies, duurde even maar werkt perfect! :D mijn dank is groot. 2e vraagje: zou je formules die je in excel hebt staan kunnen vergrendelen. Dus als men gaat knippen kopiëren plakken de formule altijd blijft staan...
  zaterdag 2 april 2011 @ 10:29:09 #197
62215 qu63
..de tijd drinkt..
pi_94935180
quote:
1s.gif Op zaterdag 2 april 2011 07:18 schreef Peter1612 het volgende:
Inderdaad topadvies, duurde even maar werkt perfect! :D mijn dank is groot. 2e vraagje: zou je formules die je in excel hebt staan kunnen vergrendelen. Dus als men gaat knippen kopiëren plakken de formule altijd blijft staan...
Ken je de "$" in een formulue?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_94949962
Even selecteren en op F4 drukken.
pi_94970269
quote:
Op zaterdag 2 april 2011 10:29 schreef qu63 het volgende:

[..]

Ken je de "$" in een formulue?
Ben ik niet bekend mee, zal de tip van Henk is proberen :)
  zondag 3 april 2011 @ 10:41:18 #200
62215 qu63
..de tijd drinkt..
pi_94971036
quote:
1s.gif Op zondag 3 april 2011 09:31 schreef Peter1612 het volgende:

[..]

Ben ik niet bekend mee, zal de tip van Henk is proberen :)
Die tip van Hendrik gooit een of meerdere $'s in je formule.
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
abonnement Unibet Coolblue
Forum Opties
Forumhop:
Hop naar:
(afkorting, bv 'KLB')