Ik zou ook uitkomen op +/- ¤25 per uurquote:Op woensdag 9 juni 2010 13:36 schreef DaFan het volgende:
Even offtopic vraag eigenlijk maar:
[GEZ] VB/Excel programmeur
Wat zouden jullie hiervoor rekenen als jullie iets dergelijks in je vrije tijd deden/doen?
En doe je zoiets dan liever in Excel of in Access (mits je ervaring hebt met Access anders geen relevante vraag).
Volgens mij zijn er ook wel goedkope voorraadbeheer programmaatjes voor te krijgen. Daar kun je vaak op uurloon niet tegenop programmeren. Ik had het niet gedaan want er wordt ook altijd support verwacht en dat gaat jou veel tijd kosten en weinig opleveren.quote:Op woensdag 9 juni 2010 13:36 schreef DaFan het volgende:
Even offtopic vraag eigenlijk maar:
[GEZ] VB/Excel programmeur
Wat zouden jullie hiervoor rekenen als jullie iets dergelijks in je vrije tijd deden/doen?
En doe je zoiets dan liever in Excel of in Access (mits je ervaring hebt met Access anders geen relevante vraag).
daarvoor kun je de indirect functie gebruiken. Met indirect kun je de tekst van de celverwijzing in een andere cel hebben staan.quote:Op donderdag 10 juni 2010 15:03 schreef Martijn85 het volgende:
Ik heb een excel workbook en in ik wil een een sheet een overzicht maken van alle andere sheets.
Dit overzicht wordt opgebouwd uit steeds dezelfde cellen per sheet.
ik wil dan de gegevens per sheet op 1 regel hebben en uit een andere sheet daar weer onder.
voorbeeld overzicht:
sheet1: xxxxxxx - xxxxxxx - xxxxxxx - xxxxxxxxx
sheet2: xxxxxxx - xxxxxxx - xxxxxxx - xxxxxxxxx
sheet3: xxxxxxx - xxxxxxx - xxxxxxx - xxxxxxxxx
etc... (- is nieuwe kolom)
Hoop dat het een beetje duidelijk is
Doe eens een mouseover bij die dino Deetch en DaFan gebruiken nog een oude (fossiele) layoutquote:Op donderdag 10 juni 2010 15:59 schreef Holy_Goat het volgende:
deetch, dafan, wat is dat voor dino achter je naam?
en die 25e, bedoel je dat netto?
Diensten mogen niet aangeboden worden.quote:Op donderdag 10 juni 2010 16:03 schreef Holy_Goat het volgende:
het topic mocht trouwens niet... mmhh. Waarom werd het uberhaupt dichtgegooid?
Tegen policy? Tis toch een soort v/a? Had wel interesse dat klusje op te pakken.
ik denk al: wat voor moederneukende dino?quote:Op donderdag 10 juni 2010 16:11 schreef qu63 het volgende:
[..]
Doe eens een mouseover bij die dino Deetch en DaFan gebruiken nog een oude (fossiele) layout
Whahahahahaha die dino bij jouw account!quote:Op donderdag 10 juni 2010 16:34 schreef Deetch het volgende:
[..]
ik denk al: wat voor moederneukende dino?
Wel een leuke toevoeging.
iedereen die dino grappen maakt over mijn account krijgt geen excel hulp meer
Ik wil eigenlijk nog een eigen bedrijfje (zzp) opstarten, omdat ik redelijk wat klusjes aantrek en uitbetaald worden in spullen een beetje zatraak. Heb alles al wat ik wil hebben op dit moment in mijn studentenkotquote:Op donderdag 10 juni 2010 16:24 schreef DaFan het volgende:
[..]
Diensten mogen niet aangeboden worden.
Ik heb hem nog een pm gestuurd maar geen reactie. ¤ 500 misschien toch te veel?
Vandaag een cijfer terug voor dat verslag, en waar ik al bang voor was een onvoldoende omdat die prof van alles niet goed vond aan vooral dit plaatje. ga dus nu met een onvoldoende het examen inquote:Op maandag 31 mei 2010 16:33 schreef Nick_Taken het volgende:
Ik heb een grafiek gemaakt aan de hand van een tabel, alleen is er een ding wat mij mateloos stoort en ik niet aangepast krijg:
[ link | afbeelding ]
De vloeiende lijn komt boven de 100% uit, dat kan en mag dus niet.
Nu een halve dag lopen zoeken en googlen maar nergens iets over dat je de kromme kan instellen/marges ingeven of gewoon een keiharde limiet kan instellen.
Is dit een beperking van excel waar ik tegen aan loop of zoek ik gewoon verkeerd?
' Dichttimmeren' is een groot woord.quote:Op donderdag 10 juni 2010 16:45 schreef Holy_Goat het volgende:
Even over een andere opmerking: iemand was goed in dichtgetimmerde contractjes. Ergens vandaan gefietst? Of zelf rechtskundig opgesteld?
Lekker kutquote:Op donderdag 10 juni 2010 17:04 schreef Nick_Taken het volgende:
[..]
Vandaag een cijfer terug voor dat verslag, en waar ik al bang voor was een onvoldoende omdat die prof van alles niet goed vond aan vooral dit plaatje. ga dus nu met een onvoldoende het examen in
uren aangeven en inschatten vind ik overigens nog vrij lastig. Ik ben ook veel te lief voor dat soort dingen overigens. Moet zakelijk nog behoorlijk uitharden. Ook onderhandelskillz... sja dat leer je niet uit een boekje!quote:Op donderdag 10 juni 2010 17:23 schreef DaFan het volgende:
[..]
' Dichttimmeren' is een groot woord.
Ik mag geen witte klusjes aannemen want ik heb een fulltime baan en staat in mn contract. Daarom zou het zwart gaan.
Ik denk dat je bij dit soort klussen goed moet aangeven;
- Wat ga ik voor je maken (desnoods een plaatje in Paint zodat je weet waar de klant op rekent)
- In welke tijd
- Hoe vaak kan dit bijgesteld worden
- Wanneer is het definitief akkoord en wat valt er dus onder extra werk?
- Hoe ga je me betalen (helft voor/helft na?)
- Als er na definitieve oplevering vragen of wensen zijn, wat wordt dan het uurtarief, en hoe spreken we iets af?
iemand een idee?quote:Private Sub TextBox1_Change()
Application.ScreenUpdating = False
If Len(TextBox1.Value) = 0 Then
ActiveSheet.AutoFilterMode = False
Else
ActiveSheet.Range("$F$17:$F$1337").AutoFilter field:=1, Criteria1:="=*" & TextBox1.Value & "*", VisibleDropDown:=False
Application.ScreenUpdating = True
End If
End Sub
Private Sub TextBox2_Change()
Application.ScreenUpdating = False
If Len(TextBox1.Value) = 0 Then
ActiveSheet.AutoFilterMode = False
Else
ActiveSheet.Range("$G$17:$G$1337").AutoFilter field:=1, Criteria1:="=*" & TextBox1.Value & "*", VisibleDropDown:=False
Application.ScreenUpdating = True
End If
End Sub
Dankje voor de tip ben er aan het induiken op het moment.quote:Op donderdag 10 juni 2010 22:00 schreef DaFan het volgende:
Omdat je al en filter op range 1 hebt, kan je niet nog een filter op range 2 doen.
Je zal dus moeten testen in de Change van Textbox1, of Textbox2 al gevuld is of niet. En zo ja, dan een filter toepassen van BEIDE.
Idem voor Textbox2.
Btw: http://en.wikipedia.org/wiki/Hungarian_notation
Het is wel best practice om je objecten zo te hernoemen dat je direct weet wat het is als je je code later terugleest (over een half jaar oid). Nu snap ik dat je ws net bent begonnen met je code maar alvast als tip
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | If Len(TextBox1.Value) = 0 AND Len(TextBox2.Value) = 0 Then ActiveSheet.AutoFilterMode = False ElseIf Len(TextBox1.Value) <> 0 AND Len(TextBox2.Value) = 0 Then ActiveSheet.Range("$G$17:$G$1337").AutoFilter field:=1, Criteria1:="=*" & TextBox1.Value & "*", VisibleDropDown:=False ElseIf Len(TextBox2.Value) <> 0 AND Len(TextBox1.Value) = 0 Then ActiveSheet.Range("$G$17:$G$1337").AutoFilter field:=1, Criteria1:="=*" & TextBox2.Value & "*", Else hier je code voor beide filters, weet syntax even niet End If Application.ScreenUpdating = True End Sub |
Ja, beperking van excel, enige optie is veel meer meetpunten, maarja ik kon moeilijk met duizend zeven gaan werken. Het ligt eerder aan die prof dan aan excel hoor, hij vraagt veel te veel. Van alle verslagen, 3 per groep bij iets van 10 groepen waren er geen cijfers boven de 6. Dat zegt toch wel iets. Gewoon komende dinsdag nu minimaal een 7,5 halen om gemiddeld een 6 te komen staan. Het is gewoon niet eerlijk dat je afgerekend wordt op de beperkingen van Excel.quote:Op donderdag 10 juni 2010 17:23 schreef DaFan het volgende:
[..]
Lekker kut
Ik weet het antwoord ook niet namelijk.
Heb je gekeken op MrExcel of niet?
Ja sorry ben totaal niet in thuis hierin vandaar dat ik (nog) niet echt mee kan denken .quote:Op vrijdag 11 juni 2010 08:08 schreef DaFan het volgende:
Swindler; een beetje meedenken kan geen kwaad
Je had in je code:
ActiveSheet.AutoFilterMode = False
Maar die heb ik nu per ongeluk onder een If gezet.
Verander;
If Len(TextBox1.Value) = 0 AND Len(TextBox2.Value) = 0 Then
ActiveSheet.AutoFilterMode = False
in
ActiveSheet.AutoFilterMode = False
If Len(TextBox1.Value) = 0 AND Len(TextBox2.Value) = 0 Then
Top, het werktquote:Op donderdag 10 juni 2010 15:59 schreef Deetch het volgende:
[..]
daarvoor kun je de indirect functie gebruiken. Met indirect kun je de tekst van de celverwijzing in een andere cel hebben staan.
in sheet1 cel A2 zet je de tekst "sheet2" in cel B1 zet je de celverwijzing waar je naar verwijst (bijv. "A3")
als je nu in cel B2 de waarde uit sheet2 cel A3 wilt halen typ je daar:
=indirect(A2&"!"&B1) en klaar ben je.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | Application.ScreenUpdating = False ActiveSheet.AutoFilterMode = False If Len(TextBox1.Value) = 0 And Len(TextBox2.Value) = 0 Then ElseIf Len(TextBox1.Value) <> 0 And Len(TextBox2.Value) = 0 Then ActiveSheet.Range("$F$21:$F$1337").AutoFilter field:=1, Criteria1:="=*" & TextBox1.Value & "*", VisibleDropDown:=False Application.ScreenUpdating = True End If End Sub Private Sub TextBox2_Change() Application.ScreenUpdating = False ActiveSheet.AutoFilterMode = False If Len(TextBox1.Value) = 0 And Len(TextBox2.Value) = 0 Then ElseIf Len(TextBox2.Value) <> 0 And Len(TextBox1.Value) = 0 Then ActiveSheet.Range("$G$21:$G$1337").AutoFilter field:=1, Criteria1:="=*" & TextBox1.Value & "*", VisibleDropDown:=False Application.ScreenUpdating = True End If End Sub |
Post je formules eens?quote:Op maandag 14 juni 2010 23:25 schreef Daantke het volgende:
[ afbeelding ]
Wat ie moet doen:
Van de cellen N-R de laagste prijs selecteren. DIt doet ie overal goed, zie kolom L.
Daarna moet hij de bijbehorende leverancier bij die laagste prijs zoeken (kolom K). Dit doet hij echter alleen bij de 1e en de 3e leverancier. Formule is hetzelfde (gewoon doorgetrokken) en celformat is ook gelijk
1 |
1 |
1 |
Als ( ) ik 't nu goed zie kijk je eerst of er iets "#N/A" is, als dat zo is ga je verder. Volgens mij loopt 't daar al fout...quote:
Ja.quote:Op dinsdag 15 juni 2010 10:31 schreef Stansfield het volgende:
Is het eigenlijk mogelijk om bepaalde cellen te blokkeren zeg maar. Dat daar niet in gewijzigd kan worden?
Ik heb excel 2003 NL.
Forum Opties | |
---|---|
Forumhop: | |
Hop naar: |