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

Excel/Macro

Anoniem
Dijkele
4 antwoorden
  • het is vast heel simpel maar ik weet niet hoe het moet:

    ik wil graag automatisch met een macro een grafiek maken van enkele reeksen getallen. Probleem is dat de hoeveelheid waarden kan verschillen. Hoe kan ik er nu voor zorgen dat hij van een bepaalde kolom alleen de niet-lege cellen neemt? De grafiek ziet er erg lelijk uit met lege cellen aan het eind van de grafiek
    Iemand die het wel weet?

    het moet ws. hier ergens geplaatst worden:
    <knip>
    ActiveChart.SetSourceData Source:=Sheets("SpeedAndTack").Range("A1:C4463"), _
    PlotBy:=xlColumns
    ActiveChart.SeriesCollection(1).Delete
    ActiveChart.SeriesCollection(1).XValues = "=SpeedAndTack!C1"
    ActiveChart.Location Where:=xlLocationAsObject, Name:="SpeedAndTack"
    </knip>

    m vr gr

    muesli
  • Je zult inderdaad eerst een aftest moeten doen voordat je de
    grafiek opbouwt. Dus zoiets als :

    [code:1:dd31647901]Dim rij As Integer


    rij = 1


    ' zoek de laatste lege rij
    Do While Worksheets("SpeedAndTack").Range("C" & rij).Value <> ""
    rij = rij + 1
    Loop[/code:1:dd31647901]
  • bedankt,
    zo wordt de rij dus gedefineerd. Maar hoe implementeer ik dit nu in

    ActiveChart.SetSourceData Source:=Sheets("SpeedAndTack").Range("A1:C4463"), _
    PlotBy:=xlColumns
    ?
    die 4463 moet dus vervangen worden door "rij", hoe regel ik dit?
  • Range("A1:C4463") wordt Range("A1:" & rij)

Beantwoord deze vraag

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