Sub of functie verschil

[Kristiaan20]

Je herkent mij vast niet - Iemand die een niet zo urgent boeiende vraag heeft en duidelijk niet normaal kan omschrijven of uitleggen. Maar toch heb ik mij vandaag aangesloten bij deze community en ben ik positief gestemd!! Ik wens dat er een oplossing komt zodat ook anderen daar maximaal gebruik van kunnen maken. P.s. Let niet op de titel.

Omschrijving:
Ik wil graag uitzoeken wat de mogelijkheid is om met de gegeven code een eureka moment te verkrijgen. Zodat ik snap wat de Sub of functie uitvoert en zodat ik het kan aanpassen naar wat gewenst is. In mijn situatie is het dus bijvoorbeeld zo: Er wordt binnen de sub op een bepaald moment een functie aangeroepen die gemaakt is voor 2 soorten bestanden. Deze functie(s) zijn bijna identiek van elkaar gekopieerd en ondergebracht in 2 modules om ze te scheiden. Ze hebben de zelfde file type .pdf maar dit zorgt er voor dat ik 2 reeksen krijg en ze kan scheiden/onderbrengen of opslaan in 2 directories.[FONT=&amp]

[/FONT]Overig commentaar:
Goed na uren mijn gedachten en mogelijke combinaties er op los te hebben gelaten loop ik toch vast. Hieronder zal ik toelichten op het wat ik niet snap aan of binnen de functie. Maar goed voor nu maak ik mij niet druk - misschien is er iemand die mij kan bijstaan en weet hoe we hier een mouw aan kunnen passen.




Code & Extra:

[TABLE="class: xml"]
[TR="class: li1"]
[TD="align: right"]1
2
3
4
5
6
7
8
9
10
11
12
13[/TD]
[TD]Else
nextInvoiceNum = 0
'month found. Now find the highest invoice number in the folder.
Do While rName <> ""
Debug.Print "Found File: " & rName
newnumber = Left(Right(rName, 7), 4)

If newnumber > nextInvoiceNum Then
nextInvoiceNum = newnumber
End If
rName = Dir
Loop
End If[/TD]
[/TR]
[/TABLE]
​

(excuses alvast voor de spreektaal die hieronder staat)

Het bovenstaande stukje code werkt. Er zijn altijd oplossingen, zowel praktische als minder praktische en ik probeer hier niet het wiel opnieuw uit te vinden! Het werkt en het is dus al mogelijk maar met huidige code krijg ik bijna het resultaat wat ik wens.
Namelijk: (zie bijlage)

En nu het gene wat ik niet snap:
Waarom kan ik het nummer bijvoorbeeld niet definiëren vanuit het midden of vanaf links. Zodat ik bijvoorbeeld HoutjeTouwtje achter de cijfers kan laten zetten zonder problemen of een andere naam. Want zodra er nu ook maar 1 spatie of een ander teken aan het einde komt moet ik dat ook meenemen in het stukje "newnumber = Left(Right(rName, 7), 4)". Dan werkt in principe de code ook, maar zoals het nu staat werkt de code eigenlijk alleen zodra de cijfers aan het einde staan. En nu maakt het niet zo zeer uit wat er voor staat, ik wil dit juist omkeren naar boeiend wat er voor komt en naar niet zo boeiend naar wat er achter komt.

En eigenlijk is deze irritatie ontstaan omdat alles niet van boven naar onder komt te staan. De meest simpele oplossing is eigenlijk 1 keer klikken op datum wordt gesorteerd binnen de directory in verkenner of klikken op het kopje gewijzigd op. Maar ja dat is niet wenselijk.




Groeten van de grootste zeiksnor ooit,
Kristiaan.

 

[snb]

Verwijder je tekst, vooral het plaatje ( we zijn hier niet in een Photoshop forum).
Wijzig de titel van deze draad zodat latere bezoekrs kunnen profiteren van jouw vraag en onze antwoorden.
Plaats je bestand en toon daarin wat de gewenste situatie is.

 

[Kristiaan20]

Kun je me misschien hiermee helpen aangezien ik niet helemaal snap wat je bedoeling is en waar je precies op doelt... Vooral met de feedback plaats een bestand en toon daarin wat de gewenste situatie is. Ik bedoel dag 1 op dit forum en een vingertje krijgen van jou betekend toch niet gelijk dat ik hier een beerput aan taboes heb gecreëerd. Ik dacht dat als ik het zo deed ik nog conform de regels was.... Blijkbaar niet dus. Hg Kristiaan:thumb:

 

[alphamax]

newnumber = Mid(rname, Len(rname) - 6, 4)

Zolang je variabelen niet declareert kan iets wat lijkt op een getal

• een getal zijn
• een string zijn met getallen.

Hierdoor kan het komen dat de code niet doet wat je denkt dat de code doet.

Dus, verstoppertje met getallen???
Wie zegt dat je getallen aan het verstoppen bent?
Misschien is het wel een tekenreeks/string met getallen!

 

[Senso]

Welkom
Helpmij.nl heeft een archieffunctie en het is de bedoeling dat mensen met een soortgelijke vraag met behulp van Google (goede titel gewenst) deze topic en de oplossing kunnen vinden. Met een dergelijke titel zie ik dat ook niet zitten.

Het bovenstaande stukje code werkt. Er zijn altijd oplossingen, zowel praktische als minder praktische en ik probeer hier niet het wiel opnieuw uit te vinden! Het werkt en het is dus al mogelijk maar met huidige code krijg ik bijna het resultaat wat ik wens.

Dat is toch een rare constructie. Dan vraag ik mij ook af waar en hoe het toegepast wordt (voorbeeldbestand) om er wat zinnigs over te zeggen. In de forumregels staat wel het verzoek een voorbeeldbestand te plaatsen.