Wat heb je zelf al geprobeerd?quote:Op vrijdag 9 juli 2010 10:54 schreef IvovandenAkker het volgende:
Nu wil ik dat er automatisch een koppeling komt met tabblad 2, wanneer ik achter iemand zijn naam de D(dagdienst) of de A(avonddienst) zet, wil ik dat zijn gegevens, naam, leeftijd en telnr (B, C en D) naar het tweede tabblad wordt gekopieerd en ik op dat tablad dan automatisch het dagrooster te zien krijg, de mensen van de dagdienst in et bovenste tabel, en de mensen van de avonddienst in de onderste.
Hoe gaat me dit lukken?
Alvast super bedankt!
Nou ik heb er gistyer de gehele ochtend mee bezig geweest of verschillende formules uit te proberen, maar ik heb niet veel kennis van excel duskom er niet uit.quote:
Welke formules heb je geprobeerd?quote:Op vrijdag 9 juli 2010 11:23 schreef IvovandenAkker het volgende:
[..]
Nou ik heb er gistyer de gehele ochtend mee bezig geweest of verschillende formules uit te proberen,
Das makkelijk gezegd.. Kennis is ook aan te leren he, dan kom je er wel zelf uitquote:maar ik heb niet veel kennis van excel duskom er niet uit.
omdat als je zo redeneert ik er ook geld voor kan gaan vragenquote:Op vrijdag 9 juli 2010 11:37 schreef IvovandenAkker het volgende:
Dat is ook precies de reden... Waarom zou ik blijven prutsen als jullie het veel sneller en veel beter kunnen dan ikzelf.
quote:Op vrijdag 9 juli 2010 11:37 schreef IvovandenAkker het volgende:
Dat is ook precies de reden... Waarom zou ik blijven prutsen als jullie het veel sneller en veel beter kunnen dan ikzelf.
de formules die ik heb getest zijn transponeren en isverwijzing.... verder komt er weinig in de buurt volgens mij
En aangezien al je topics hier op fok vragen zijn geweest die ook via google opgelost hadden kunnen worden ga ik mijn tijd hier niet in stekenquote:Op vrijdag 9 juli 2010 11:54 schreef Holy_Goat het volgende:
[..]
omdat als je zo redeneert ik er ook geld voor kan gaan vragen
Tis een vraagbaak, geen solution on demand
Lol, Ivo moet eerst maar eens de help van excel doorlezen. Zoek dan op auto filter of data sorteren oid. Beetje zelf nadenken kan geen kwaad.quote:
We de manier waarop het gevraagd wordt.. Gewoon roepen dat je iets niet lukt is wel erg simpel..quote:Op vrijdag 9 juli 2010 15:33 schreef Frollo het volgende:
Ik snap het ook niet helemaal, zo absurd is het toch niet wat Ivo vraagt? Normaal is de sfeer toch wel beter hier.
Oh, en vragen is inderdaad niet erg, maar geven ook niet. Ik blijf terugkomen naar deze reeks omdat ik zelf nog niet alles weet én ik anderen kan helpen met dingen die ik wél weet.quote:Op vrijdag 9 juli 2010 15:30 schreef IvovandenAkker het volgende:
Ach... Ik dacht dat dit topc was om vragen te stellen...
Dat heb ik gedaan, als julie niet willen helpen is dat prima, ik dacht alleen dat vragen vrij stond.
Maar zomaar iets voor een ander doen is natuurlijk heel ouderwets... ik las al weer dat er geld werd gevraagd...
Ik vind wel een andere weg.
Toch bedankt Ieder die kosteloos een reactie wilde geven!
| 1 2 3 4 5 6 | DIG Welke digitale tv-aanbieder kiezen? IvovandenAkker 20 731 11/09 13:00 - funrider DIG excel als webpagina IvovandenAkker 16 521 10/09 13:03 - H-blast UVT Ontvangst op schiphol IvovandenAkker 14 531 02/03 11:50 - fathank DIG laptop ablu ray speler/ hoe speel ik hd af?? IvovandenAkker 6 553 17/01 17:01 - dennisreijbroek DIG swf rippen IvovandenAkker 5 231 11/09 10:18 - IvovandenAkker |
| 1 2 3 4 5 6 | Searchin = ActiveCell.Value Dim Searchfor As String Searchfor = "??.??" MsgBox InStr(1, Searchin, "??.??") |
| 1 2 3 4 5 6 | Searchin = ActiveCell.Value Dim Searchfor As String Searchfor = "??.??" MsgBox InStr(1, Searchin, Searchfor) |
Als return wel 1. Het is een code die in een hele reeks tekst moet worden gevonden en het format heeft van 2 cijfers, een punt en twee cijfers.quote:Op zaterdag 10 juli 2010 20:22 schreef DaFan het volgende:
Ik snap niet precies wat je wilt, want eigenlijk wil je als return 3 hebben toch, niet 1?
En dat je daarna met Links() 12.34 er uit kunt filteren neem ik aan?quote:Op zaterdag 10 juli 2010 21:00 schreef hendrik2009 het volgende:
[..]
Als return wel 1. Het is een code die in een hele reeks tekst moet worden gevonden en het format heeft van 2 cijfers, een punt en twee cijfers.
De formule doet dus wat ik wil, alleen de VBA variant krijg ik niet werkend helaas.
[ afbeelding ]
Ik hoop dat het hiermee wat duidelijk wordt.
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 | Optional StartAt As Long = 1) As Long Dim X As Long Dim SearchMe As String SearchMe = Mid$(Source, StartAt) If Source Like "**" & FindMe & "**" Then For X = 1 To Len(SearchMe) If Mid$(SearchMe, X) Like FindMe & "**" Then InStrWild = X Exit For End If Next End If End Function |
| 1 |
| 1 2 3 4 5 6 7 8 9 | If str1 Like "*" & str2 & "*" Then InStrWild2 = InStr(1, str1, Split(str2, "*")(0)) Else InStrWild2 = -1 End If End Function |
Met een deel (EN: MID) functie alleen de code weergeven, door vanaf de gevonden positie 5 karakters weer te geven.quote:Op zaterdag 10 juli 2010 21:21 schreef qu63 het volgende:
[..]
En dat je daarna met Links() 12.34 er uit kunt filteren neem ik aan?
Weet niks van VBA, maar dacht even hard op
Mja, dat bedoelde ik ook jaquote:Op zaterdag 10 juli 2010 22:06 schreef hendrik2009 het volgende:
[..]
Met een deel (EN: MID) functie alleen de code weergeven, door vanaf de gevonden positie 5 karakters weer te geven.
Thanks! Ik heb deze tweede functie gebruikt.quote:Op zaterdag 10 juli 2010 21:28 schreef DaFan het volgende:
Of
[ code verwijderd ]
=InStrWild2(A1,".")-2
| 1 2 3 4 5 6 7 | If str1 Like "*" & str2 & "*" Then InstrWild = InStr(10, str1, Split(str2, "*")(0)) - 2 End If End Function |
| 1 2 3 4 5 6 7 8 9 10 | Dim InstrWild As Long If str1 Like "*" & str2 & "*" Then InstrWild = InStr(10, str1, Split(str2, "*")(0)) - 2 End If dn = Mid(str1, InstrWild, 10) End Function |
| 1 2 3 4 5 | .... Else .... End If |
De split functie moet herkennen dat er voor de . een getal staat ipv letters, maar hoe?quote:Op zondag 11 juli 2010 10:38 schreef Beavis het volgende:
Soms pruts ik ook wat met macro's en ik zou kijken of je dat kan afvangen met een IsNumeric controle:
[ code verwijderd ]
Of ben ik nou niet slim bezig?
| 1 2 3 4 5 6 7 8 9 10 | Dim InstrWild As Long If str1 Like "*" & "." & "*" Then InstrWild = InStr(10, str1, Split(".", "*")(0)) End If dn = Mid(str1, InstrWild - 2, 10) End Function |
quote:Op zaterdag 10 juli 2010 23:38 schreef hendrik2009 het volgende:
De functie dient toch nog wat aangepast te worden. Nu wordt namelijk soms tekst weergegeven, als dat het eerste is waar de punt in voorkomt. Ik wil dus nog toevoegen dat het wel aan het volgende format moet voldoen:
##.##
Maar hoe doe ik dit?
Regular Expressions: http://msdn.microsoft.com/en-us/library/ms974570
Dat heb ik nodig. Nu nog toepassen.
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 | Dim X As Long Dim SearchMe As String SearchMe = Mid$(Source, StartAt) For X = 1 To Len(SearchMe) If Mid$(SearchMe, X) Like "##" & FindMe & "##" Then InStrWild = X Exit For End If Next End Function |
is het resultaat 16.quote:ba. 14.5 dfsdf 14.56
| 1 |
Ik had eerst jouw tweede UDF gebruikt, omdat ik bij de eerste het gewenste resultaat niet kreeg. Je laatste code werkte in mijn voorbeeld, maar toen ik het op de werkelijke situatie toepaste, werd het format schijnbaar niet herkend. Na nog verder zoeken, heb ik onderstaande code werkend. Bedankt voor je hulp.quote:Op zondag 11 juli 2010 10:49 schreef DaFan het volgende:
[..]
[ code verwijderd ]
Met een UDF dus :P
Bij deze string:
[..]
is het resultaat 16.
Alt-F11 in Excel - Insert - Module.
Plak hier de code.
Nu kan je dus dmv
[ code verwijderd ]
je positie vinden.
| 1 2 3 4 5 6 7 8 | Dim x, i As Long Const Patrn As String = "##.##.####" x = Split(str1, " ") For i = 0 To UBound(x) If x Like Patrn Then DN = x : Exit FunctionNext End Function |
User Defined Function.quote:Op dinsdag 13 juli 2010 08:48 schreef Holy_Goat het volgende:
even tussen haakjes, UDF? wasda?
Invoegen -> vormen?quote:Op dinsdag 13 juli 2010 13:42 schreef Joooo-pi het volgende:
Ik probeer nog steeds in Excel 2007 een optie te vinden die ik altijd in 2003 gebruikte, namelijk het aanwijzertje om meerdere objecten (bijv. plaatjes en lijntjes) te selecteren.
Weet iemand waar die zit?
(in 2003 zat die in de werkbalk "tekenen" helemaal links.)
Oh wacht, je wil ze niet tekenen, maar aanklikken om iets mee te kunnen doenquote:Op dinsdag 13 juli 2010 14:00 schreef Joooo-pi het volgende:
[..]
Volgens mij niet, of ik zie 'm over het hoofd
Nee.quote:Op dinsdag 13 juli 2010 14:03 schreef qu63 het volgende:
[..]
Oh wacht, je wil ze niet tekenen, maar aanklikken om iets mee te kunnen doen
CTRL+klik?
Onder de knop (waar je opslaan e.d. vindt) zit ook de optie "Voorbereiden"quote:Op dinsdag 13 juli 2010 14:20 schreef qu63 het volgende:
Is het ook mogelijk om in Excel te achterhalen wie er als auteur ingesteld is?
In Word heb je zogenaamde 'bouwstenen' die je in je document in kan voegen, heeft Excel dat ook?
Ik wil het dus in mn sheet te zien krijgenquote:Op dinsdag 13 juli 2010 14:31 schreef Joooo-pi het volgende:
[..]
Onder de knop (waar je opslaan e.d. vindt) zit ook de optie "Voorbereiden"
Selecteer dan "Eigenschappen"
Ah, oké. Is misschien ook wel mogelijk, maar weet ik zo niet...quote:Op dinsdag 13 juli 2010 14:42 schreef qu63 het volgende:
[..]
Ik wil het dus in mn sheet te zien krijgen
Iig niet via INFO()quote:Op dinsdag 13 juli 2010 14:43 schreef Joooo-pi het volgende:
[..]
Ah, oké. Is misschien ook wel mogelijk, maar weet ik zo niet...
in VBA kun je dit gebruiken:quote:
Ik hou niet zo van VBAquote:Op dinsdag 13 juli 2010 14:54 schreef Joooo-pi het volgende:
[..]
in VBA kun je dit gebruiken:
ThisWorkbook.BuiltinDocumentProperties("Author")
Maak er zelf een functie van en hoppa!
Maar dit is heel eenvoudig. Insert Module in de visualbasic editor (ALT+F11)quote:
| 1 2 3 | auteur = ThisWorkbook.BuiltinDocumentProperties("Author") End Function |
Ah, ik was al aan het klooien en kwam er niet uitquote:Op dinsdag 13 juli 2010 15:05 schreef Joooo-pi het volgende:
[..]
Maar dit is heel eenvoudig. Insert Module in de visualbasic editor (ALT+F11)
vul dit in:
[ code verwijderd ]
Ga terug naar je excelsheet en in de cell waar je de auteur wil hebben zet je:
=auteur()
| Forum Opties | |
|---|---|
| Forumhop: | |
| Hop naar: | |