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

[VBA][excel] Hoe de X en Y coordinaten bepalen van een cel?

Anoniem
R@deviL
4 antwoorden
  • Mensen ik heb nu toch echt een beetje hulp nodig :(

    Ik ben met een VBA macro in excel bezig die van een helehoop data een nette rapportage tabel maakt. Aan het einde (onderaan, lengte is dynamisch) van die tabel moeten een textbox komen met wat informatie over de tabel.

    Alleen hier is het probleem, ik kan precies bepalen in welke cell de textbox moet komen, maar de textbox wil een X en Y coordinaat hebben.

    Ik kan absoluut niet vinden hoe ik een specifieke cell kan omzetten in X en Y.

    Het lijkt mij vast wel mogelijk, alleen kan ik niet vinden hoe. Weet iemand hoe je dat kan doen.?

    Alvast bedankt!

    vr.gr.
    Peter
  • Stap 1: selecteer de cel waar je de textbox wil plaatsen
    [code:1:8256fea36f]Range(<gewenste_cel>).Activate[/code:1:8256fea36f]
    Stap 2: voeg een textbox toe, met de volgende code
    [code:1:8256fea36f]Call ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal, _
    ActiveCell.Left, ActiveCell.Top, <gewenste breedte>, _
    <gewenste hoogte>)[/code:1:8256fea36f]
    Stap 3: kijk tevreden toe hoe de textbox op de juiste plaats wordt gezet 8)
  • meneer ed, woon je ver weg, anders kom ik je even een zoen geven :lol:

    Soms is het ook allemaal zo simpel :oops:

    Thanks!
  • [quote:d5de7f712b="R@deviL"]meneer ed, woon je ver weg, anders kom ik je even een zoen geven :lol:
    [/quote:d5de7f712b]
    :o , euh, Amsterdam :P
    [quote:d5de7f712b="R@deviL"]
    Soms is het ook allemaal zo simpel :oops:

    Thanks![/quote:d5de7f712b]
    Graag gedaan. Je kan trouwens de code ook nog wat aanpassen en de tekst gelijk via de macro in het vak plaatsen:
    [code:1:d5de7f712b]ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal, _
    ActiveCell.Left, ActiveCell.Top, <gewenste breedte>, _
    <gewenste hoogte>).Select
    Selection.Characters.Text = "<hier je tekst>"[/code:1:d5de7f712b]

Beantwoord deze vraag

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