Jack Nouws
Terugkerende gebruiker
- Lid geworden
- 16 apr 2008
- Berichten
- 1.396
Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Privacywetgeving
Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.
OK Bedankt allen. Dit is degen die ik nodig had!!
Groeten, Jack.
Zou je me kunnen helpen
Kijk maar eens naar je Mail
Groeten Jack
Heb ik gedaan en ik heb zelfs het bestand geopend.
Wat gaat er precies niet goed?
Wat wil je aangepast hebben?
Ik kan wel wat fabriceren maar dat zal waarschijnlijk pas in de loop van de dag/avond zijn.
Met vriendelijke groet,
Roncancio
Volgens mij moet het zo:
Code:=ALS(F15="";"";ALS(F15<G15;"Teveel_betaald";ALS(F15=G15;"Voldaan";F15-G15)))
Met vriendelijke groet,
Roncancio
Lukt het??
Ay, waar komt de code vandaan?:shocked:
Het is een ratjetoe van arrays, systemregistry(!) controles :evil:, houtje-touwtje programmeerwerk, hyperlinks naar websites aanleggen, etc.
Als code probeert om in de registry te kijken dan word ik erg achterdochtig.
De code zou moeten doen wat op de knoppen staat.
Met vriendelijke groet,
Roncancio
Nou da's dan orgineel van MS Office (ratjetoe)
Ik heb het bestand links en rechts nog wat aan gepast.
Aan jou de taak om die hyperlinks naar websites er uit te halen, en die registry zoekt naar een oudere versie en die mag er ook uit.
Knop 'nieuwe factuur' werkt nog niet
Knop 'factuur bijstellen' werkt!
Knop 'factuur boeken en afdrukken' werkt!
Knop 'factuur boeken met ac afdrukken' mag je nog verwijderen.
Zou dat lukken?
Met vriendelijke groet,Jack.
Wat ik je voor de 2e keer via de mail heb gestuurd is recentVolgens mij is er een aantal punten verbeterd tov #9.
Mijn nieuwste versie van jou is 2 uur ouder dan je laatste bericht.
Mag ik hieruit concluderen dat je een nieuwere versie hebt?
Met vriendelijke groet,
Roncancio
Wat ik je voor de 2e keer via de mail heb gestuurd is recent
Wat moet nieuwe factuur eigenlijk doen?
Volgens mij niet meer dan de cellen leegmaken.
Met vriendelijke groet,
Roncancio
Public Sub NoteerFactuurnummer()
'Noteer nu het opgehaalde factuurnummer in het werkblad
Application.GoTo Reference:="Factuurnr."
[COLOR="Red"] ActiveCell.FormulaR1C1 = FactuurNummer1[/COLOR]
Application.GoTo Reference:="EersteArtikel"
DoEvents
End Sub
Code:Public Sub NoteerFactuurnummer() 'Noteer nu het opgehaalde factuurnummer in het werkblad Application.GoTo Reference:="Factuurnr." [COLOR="Red"] ActiveCell.FormulaR1C1 = FactuurNummer1[/COLOR] Application.GoTo Reference:="EersteArtikel" DoEvents End Sub
Hier krijg ik een foutmelding op. Wat wil dit stukje eigenlijk zeggen?
Groeten, Jack.
De code zet een formule in de cel neer.
Ik denk dat je wel .Value kan gebruiken ipv .FormulaR1C1.
Met vriendelijke groet,
Roncancio
Sorry ik ben iets te voorbarig geweest die .Value formule werkt niet,
Heb je nog andere suggesties?
Groeten, Jack.
Public Sub NoteerFactuurnummer()
'Noteer nu het opgehaalde factuurnummer in het werkblad
Application.GoTo Reference:="Factuurnr."
ActiveCell.Value = FactuurNummer1
Application.GoTo Reference:="EersteArtikel"
DoEvents
End Sub
FactuurNummer1 = "1000"
FactuurNummer1 = 1000
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.