Op deze website gebruiken we cookies om content en advertenties te personaliseren, om functies voor social media te bieden en om ons websiteverkeer te analyseren. Ook delen we informatie over uw gebruik van onze site met onze partners voor social media, adverteren en analyse. Deze partners kunnen deze gegevens combineren met andere informatie die u aan ze heeft verstrekt of die ze hebben verzameld op basis van uw gebruik van hun services. Meer informatie.

Akkoord

Vraag & Antwoord

Programmeren

VBAProject INVOICE van Factuur1.xlt van Office 97 aanpassen

mark
4 antwoorden
  • Hoi,

    Ik sta voor een van de ingewikkeldste problemen die ik tot nu toe heb moeten oplossen! Ik wil de factuur.xlt aanpassen die met MS Office 97 meegeleverd wordt. Deze sjabloon zet namelijk iedere keer bij het starten de Format van bepaalde ranges op FL i.p.v. EUR. De enige manier om dit te voorkomen (en die werkt) is om deze cellen te beveiligen en het sjabloon dan opnieuw op te slaan. Via code lukt het me niet. Er wordt gebruik gemaakt van een __IntlFixupTable waarvan ik maar geen hoogte kan krijgen. Ergens haalt-ie de format "Fl "#.##;"Fl "#.##- of iets dergelijks vandaan en plaatst die vervolgens in een range cellen. Ik heb echter geen faluw idee hoe en waar ik dit moet wijzigen!!!!
    Weet iemand hier dat???

    P.S. Het wachtwoord voor het INVOICE project is chzdood

  • Probeer eens bij configuratiescherm >> landinstellingen.

    ——————
    Voor Uw ASP-applicaties: Corbier Automatisering Sneek

  • Helaas, dat was natuurlijk het eerste wat ik geprobeerd heb. De format voor de cellen van de factuur wordt keihard vermeld ergens in een interne tabel (cellenbereik) genaamd __IntlFixup. Echter, kan ik de lokatie van deze cellen maar niet achterhalen, zelfs als ik de code stap voor stap doorloop d.m.v. de debug-werkbalk.
    Iemand nog ideeen?
  • ' ***********************************
    ' * Automatic execution procedures *
    ' ***********************************


    Sub Auto_Open()
    'Initializes the worksheet properties

    Application.ScreenUpdating = False
    'IntlFixup
    de coderegel hierboven niet laten laden door de apostrofe werkt bij mij. euroteken blijft staan dus lijkt me simpel. bedankt voor het wachtwoord kon ik niet uitkomen.

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.