Help!

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

Hulp bij posten

Recente topics

Auteur Topic: Knop op geselecteerde rij zetten  (gelezen 4762 keer)

0 leden en 1 gast bekijken dit topic.

Online SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.129
  • Geslacht: Man
  • Nobody is perfect, not even me...
Knop op geselecteerde rij zetten
« Gepost op: 29 september 2016, 12:21:17 »
Hallo Knappe bollen,

is het mogelijk dat ik code opneem in een macro, dusdanig dat, als ik een cel in een rij selecteer, een knop ((opdrachtknop, active-X besturingselement) die een macro "(Inlezen()" start) automatisch in (of ter hoogte van) die rij komt te staan?
De knop moet dus de geselecteerde rijen volgen.

Dank voor de hulp.

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline pitufo

  • Ambassadeur
  • *****
  • Berichten: 1.343
  • Geslacht: Man
Re: Knop op geselecteerde rij zetten
« Reactie #1 Gepost op: 29 september 2016, 13:10:25 »
Hoi SoftAid,

Hiermee kom je hopelijk verder, anders "hoor" ik het wel...

Groeten,
pitufo
"De computer doet wel degelijk wat je hem vraagt,
 maar NIET wat je DENKT dat je hem vraagt"

Online SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.129
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Knop op geselecteerde rij zetten
« Reactie #2 Gepost op: 29 september 2016, 18:33:42 »
Hallo Pitufo,

neen, lukt niet. Zodra ik een andere cel klik loopt Excel 2007 rotsvast.

Ik neem aan dat je een macro-opname-macro  ;) gebruikt hebt, aan de code te zien?

Zou niet weten wat er mis gaat  ::) :-[

:) SoftAid :)             

Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline firmin

  • Ervaren lid
  • ***
  • Berichten: 442
  • Geslacht: Man
  • Excel Specialist
Re: Knop op geselecteerde rij zetten
« Reactie #3 Gepost op: 29 september 2016, 19:51:27 »
Bij mij werkt die perfect met excel 2007

Firmin
PB easynote LE69KB,AMD quad-core,1000GB HDD,AMD Radeon HD8330,8GB DDR3
Windows 10,office 2007
MSE, Internet Explorer 11

Offline pitufo

  • Ambassadeur
  • *****
  • Berichten: 1.343
  • Geslacht: Man
Re: Knop op geselecteerde rij zetten
« Reactie #4 Gepost op: 30 september 2016, 08:09:34 »
Hallo SoftAid,

Toch niet, da's geen opgenomen macro, ik heb de procedure gewoon "uit de losse pols" geschreven, maar dat mag uiteindelijk geen enkel verschil maken...
Bij mij werkte dat onmiddellijk, en nu Firmin ook al aangeeft dat het goed is, lijkt het er zeker op dat er bij jou iets tegenpruttelt. Probeer misschien even de code in een nieuw bestand te plakken (en uiteraard een knop met de juiste benaming te voorzien).
Succes !
"De computer doet wel degelijk wat je hem vraagt,
 maar NIET wat je DENKT dat je hem vraagt"

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.277
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Knop op geselecteerde rij zetten
« Reactie #5 Gepost op: 02 oktober 2016, 11:44:55 »
@SoftAid, heb je soms nóg een SelectionChange procedure in je workbook staan? Of gaat het echt al mis in de bijlage van Pitufo?
______________________________

Groet, Leo

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.277
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Knop op geselecteerde rij zetten
« Reactie #6 Gepost op: 02 oktober 2016, 12:01:10 »
...overigens lijkt dit me voldoende...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    With ActiveSheet
        .Shapes("testknop").Top = .Cells(Target.Row, 1).Top
    End With

End Sub
Iedere keer de hoogte en breedte instellen lijkt me niet nodig. En het "vastzetten" in de eerste kolom (".Left")? Zo vaak verschuift een knop toch niet van plek op het horizontale vlak? Maar dit zijn persoonlijke dingen. Het kan verder uiteraard ook geen kwaad. ;)
______________________________

Groet, Leo

Offline pitufo

  • Ambassadeur
  • *****
  • Berichten: 1.343
  • Geslacht: Man
Re: Knop op geselecteerde rij zetten
« Reactie #7 Gepost op: 02 oktober 2016, 12:05:52 »
Helemaal akkoord, RedHead !
Ik had bij wijze van voorbeeld alleen wat extra dingetjes ingebouwd om aan te tonen dat er speelruimte is om één en ander volledig volgens eigen zin te laten werken  8)
"De computer doet wel degelijk wat je hem vraagt,
 maar NIET wat je DENKT dat je hem vraagt"

Online SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.129
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Knop op geselecteerde rij zetten
« Reactie #8 Gepost op: 02 oktober 2016, 16:11:37 »
Allemaal bedankt om mee te denken, maar helaas...

Ik maak geen fout, want ik download en open gewoon het bestand meeloopknop.xlsm van Pitufo, en Excel loopt vast (zie bijlage).

Laat maar, zo belangrijk was het niet, en mogelijk is mijn Ecxel 2007 corrupt na al die jaren...

Toch heel erg bedankt.

Groeten,

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.277
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Knop op geselecteerde rij zetten
« Reactie #9 Gepost op: 02 oktober 2016, 21:56:56 »
Ben toch wel benieuwd waar het fout gaat. Klik 'ns bij de eerste coderegel in de kantlijn waardoor er zo'n rode punt verschijnt. Veroorzaak dan in de sheet een change en doorloop stap voor stap de code tot die vastloopt.  Zo komen we er wel achter waar het probleem zit.
______________________________

Groet, Leo

Online SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.129
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Knop op geselecteerde rij zetten
« Reactie #10 Gepost op: 03 oktober 2016, 10:16:49 »
Dank voor je vastberadenheid, RedHead.

Maar ook zo zie ik niets, bij de eerste Change in het werkblad loopt Excel volledig vast. (zie bijlage)

Ook stap per stap kan ik niet testen omdat het over een Change-event gaat.

:) SoftAid :)             

Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Online SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.129
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Knop op geselecteerde rij zetten
« Reactie #11 Gepost op: 03 oktober 2016, 10:22:34 »
Het selecteren van:  Online naar oplossing zoeken,  Programma opnieuw opstarten of Foutopsporing... doen Excel volledig afsluiten.

Nog even de Details van het probleem opgevraagd.

  Gebeurtenisnaam van probleem:   BEX
  Naam van de toepassing:   EXCEL.EXE
  Versie van toepassing:   12.0.4518.1014
  Tijdstempel van toepassing:   45428263
  Naam van foutmodule:   unknown
  Versie van foutmodule:   0.0.0.0
  Tijdstempel van foutmodule:   00000000
  Uitzonderingsmarge:   04843874
  Uitzonderingscode:   c0000005
  Uitzonderingsgegevens:   00000008
  Versie van besturingssysteem:   6.1.7601.2.1.0.256.48
  Landinstelling-id:   2067

Aanvullende informatie over dit probleem:
  LCID:   1043
  Brand:   Office12Crash
  skulcid:   1043

Groeten,

:) SoftAid :)             

Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.277
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: Knop op geselecteerde rij zetten
« Reactie #12 Gepost op: 03 oktober 2016, 10:38:03 »
SoftAid, da's vreemd... Je hele Change Procedure is uitgeschakeld zie ik. En dan tóch klapt de boel? Heb je soms 1 of meerdere AddIn's draaien? Die zou je dan voor de aardigheid 'ns kunnen uitschakelen (vinkje weghalen) en dan nogmaals je knop-procedure laten lopen. Als het dan wél lukt, weet je dat er iets dwars zit in 1 van de AddIn's.

Misschien éérst ff een ander testje... Als je in een vers workbook deze procedure...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

        msgbox "De selectie is verplaatst...", vbokonly, "testje"

End Sub
....in de Sheet-module plakt en dan in de sheet aan de gang gaat met verplaatsen van de selectie, wat gebeurt er dan?
______________________________

Groet, Leo

Online SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.129
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Knop op geselecteerde rij zetten
« Reactie #13 Gepost op: 03 oktober 2016, 14:25:48 »
SoftAid, da's vreemd... Je hele Change Procedure is uitgeschakeld zie ik. En dan tóch klapt de boel? Heb je soms 1 of meerdere AddIn's draaien? Die zou je dan voor de aardigheid 'ns kunnen uitschakelen (vinkje weghalen) en dan nogmaals je knop-procedure laten lopen. Als het dan wél lukt, weet je dat er iets dwars zit in 1 van de AddIn's.
Met Add-In's bedoel je invoegtoepassingen, zeker? Er zijn geen invoegtoepassingen geïnstalleerd...  :(
Ik vind wel nog een Gekoppeld XML-uitbreidingspakket: "Microsoft Actions Pane 3", maar dat is geen AddIn.
Misschien éérst ff een ander testje... Als je in een vers workbook deze procedure...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
        msgbox "De selectie is verplaatst...", vbokonly, "testje"
End Sub
....in de Sheet-module plakt en dan in de sheet aan de gang gaat met verplaatsen van de selectie, wat gebeurt er dan?
Identiek hetzelfde als met het "meeeloopknop.xlsm bestand.

Ik heb veel problemen op de PC die mogelijk een verband kunnen houden met deze fout. Zo is Visual studio corrupt, .NET niet te updaten enzovoort.
Misschien dat dit er iets mee te maken heeft. Ik weet het niet...meer...  ;)

:) SoftAid :)             

Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

 


www.combell.com