Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Automatiseringsfout  (gelezen 9580 keer)

0 leden en 1 gast bekijken dit topic.

Offline lco

  • Oplosser
  • ****
  • Berichten: 806
  • Geslacht: Man
Automatiseringsfout
« Gepost op: 26 juli 2023, 15:17:15 »
Hallo,

Telkens ik mijn uf wil oproepen krijg ik een automatiseringsfout maar ik vind de oorzaak niet.
gegevens zijn willekeurig.

ps:ik werk met office 2007

   mvg,Lco

Offline Pagadder

  • Volledig lid
  • **
  • Berichten: 183
Re: Automatiseringsfout
« Reactie #1 Gepost op: 26 juli 2023, 15:37:00 »
Zelf heb ik geen probleem.
probeer dezecode eens en zie of het je probleem oplost.
Private Sub UserForm_Initialize()
    lst_lijst.List = [Tabel1].Value
        opt_begin = True
        txt_naam.SetFocus
End Sub
het heeft iets te maken met array volgens mij.
Je kan het volgende ook proberen:
Ga naar:
Configuratiescherm » Programma's en onderdelen
» klik op » Windows onderdelen in- of uitschakelen.
» zet een vinkje bij » Netframework 3.5 inclusief Net 2.0 en 3.0

Offline lco

  • Oplosser
  • ****
  • Berichten: 806
  • Geslacht: Man
Re: Automatiseringsfout
« Reactie #2 Gepost op: 27 juli 2023, 09:50:24 »

 Pagadder,

Ik heb beide geprobeerd maar geen verbetering!

    mvg,Lco

Offline Pagadder

  • Volledig lid
  • **
  • Berichten: 183
Re: Automatiseringsfout
« Reactie #3 Gepost op: 27 juli 2023, 09:54:14 »
al eens met F8 door je code gelopen?

Offline lco

  • Oplosser
  • ****
  • Berichten: 806
  • Geslacht: Man
Re: Automatiseringsfout
« Reactie #4 Gepost op: 27 juli 2023, 10:04:27 »
Pagadder,

hoe doe ik dat krijg het niet klaar :-[ :-[

    mvg,Lco

Offline Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Automatiseringsfout
« Reactie #5 Gepost op: 27 juli 2023, 10:05:05 »
hier ook geen problemen , Office 2021
Mvg,

Offline lco

  • Oplosser
  • ****
  • Berichten: 806
  • Geslacht: Man
Re: Automatiseringsfout
« Reactie #6 Gepost op: 27 juli 2023, 10:14:19 »
Mantagnard,pagadder,

 ik heb onlangs een nieuwe pc met windows11 gekocht.
 ik werk met office 2007 en bij de vorige pc windows10 en daar werkte alles prima?


       mvg,Lco

Offline Pagadder

  • Volledig lid
  • **
  • Berichten: 183
Re: Automatiseringsfout
« Reactie #7 Gepost op: 27 juli 2023, 10:16:33 »
Daar ik toch het vermoeden heb dat het iets te maken heeft met array
Je gebruikt in je code nog een array in Sub cmd_zoek_wissen_Click()
Haal volgende code eruit of zet er een apostrf voor.
t_array = Sheets("Blad1").ListObjects(1).DataBodyRangeVervang
lst_lijst.List = t_array door:
lst_lijst.List = [Tabel1].Value

Offline Pagadder

  • Volledig lid
  • **
  • Berichten: 183
Re: Automatiseringsfout
« Reactie #8 Gepost op: 27 juli 2023, 10:23:16 »
Als je zelf de fout niet krijgt is het wat moeilijk.
Staat er in de VBA editor bij Extra Verwijzingen ergens ontbreekt (of missing, als je een Engelstalige Excel gebruikt)?

Offline Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Automatiseringsfout
« Reactie #9 Gepost op: 27 juli 2023, 10:29:17 »
aangezien je nu toch met een "moderne" computer werkt , misschien eens overwegen om je Office te upgraden ?
moet niet zoveel kosten , ondertussen heb ik toch al bij 4 personen deze geïnstalleerd.
het verschil tussen 1 en 2 ?
1 ) is aan gebonden aan 1 computer.
2) is met een account (Microsoft account of 1 aanmaken) , dus kan je altijd meenemen naar een andere computer.
is maar een tip  ;)
Mvg,
Arnold.

https://licentiepromo.be/ , is VOLLEDIG legaal en levenslange licentie !

Offline lco

  • Oplosser
  • ****
  • Berichten: 806
  • Geslacht: Man
Re: Automatiseringsfout
« Reactie #10 Gepost op: 27 juli 2023, 10:34:22 »
 pagadder,

 code aangepast maar werkt nog niet.

Montagnard,

uw tip is misschien te overwegen maar ik zou graag de mijne behouden (gebruik het niet zo veel) en deze werkt al jaren naar behoren.
ps:graag zou ik willen weten waarom het plots niet meer werkt :-\


    mvg.Lco

Offline Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Automatiseringsfout
« Reactie #11 Gepost op: 27 juli 2023, 10:56:10 »
ik heb in Uw origineel bestand de aanpassingen gedaan zoals "pagadder" aangeeft en het werkt ook....
heb je bij "bestand" - "account" als eens gekeken om je Office bij te werken ? kan zijn dat dit op je vorige computer wel is gebeurd maar nu nog niet ?
mvg,


Offline MollyVH

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 847
Re: Automatiseringsfout
« Reactie #12 Gepost op: 27 juli 2023, 11:00:16 »
@ Pagadder,

Citaat
Daar ik toch het vermoeden heb dat het iets te maken heeft met array
Wat als we zouden stoppen met gokken? Ik zie de oorzaak zelf ook niet meteen, hoor, maar we kunnen wel gaan elimineren.

@ lco,

Probeer eens met alle regels met code in de initialisatie als commentaar te zetten en daarna het UF te openen. Als het nog steeds niet opent ligt het niet aan de code, en moet er elders gezocht worden (wat niet wil zeggen dat ik dan de oplossing zal kennen...)
Als het wel opent heeft Pagadder gelijk dat we aan de code zullen moeten foefelen.
Dus zo:
Private Sub UserForm_Initialize()

't_array = Sheets("Blad1").ListObjects(1).DataBodyRange
'lst_lijst.List = t_array
'opt_begin = True
'txt_naam.SetFocus

End Sub

Mvg,
Molly
Windows 11 Home NLD 64bit
11th Gen Intel(R) Core(TM) i7-11700 @ 2.50GHz 2496
Aspire TC-1660
Intel(R) UHD Graphics 750 1024MB
476 GB SSD KINGSTON OM8PCP3512F-AA
1863 GB HD Seagate ST2000DM008-2FR102
Office 2021 Professional Plus NLD 64bit

Offline lco

  • Oplosser
  • ****
  • Berichten: 806
  • Geslacht: Man
Re: Automatiseringsfout
« Reactie #13 Gepost op: 27 juli 2023, 11:09:12 »
Aan alle helpers,

Intussen heb ik office verwijderd en op nieuw geinstalleerd maar dat geeft ook geen verschil.
Nu ga ik Molly haar tip proberen.

   mvg

Offline Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Automatiseringsfout
« Reactie #14 Gepost op: 27 juli 2023, 11:12:12 »
Intussen heb ik office verwijderd en op nieuw geinstalleerd maar dat geeft ook geen verschil.
en dan gaan kijken of je versie moet "bijgewerkt" (geupdate) worden , zoals ik eerder heb gesuggereerd ?
Mvg,

 


www.combell.com