*

Help!

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

Hulp bij posten

Recente topics

Pagina's: [1]   Omlaag

Auteur Topic: goto "inhoud van een cel"  (gelezen 2355 keer)

0 leden en 1 gast bekijken dit topic.

Offline ErnieMHC

  • Lid
  • *
  • Berichten: 31
  • Geslacht: Man
  • Oplossing.be
goto "inhoud van een cel"
« Gepost op: 05 juni 2007, 11:33:39 »
Goedemorgen,
ik probeer een manier te verzinnen om regels met makro te vullen met formules. Dit lukt voor een vaste waarde regels. Het aantal regels is echter variabel. Nu laat ik in een cel het aantal regels tellen. Vervolgens zou ik willen dat de formules naar beneden worden gekopieerd voor dit aantal regels.
In cel a10 staat bijv. A3176. Door =aantal() weet ik nu dat er zoveel regels nodig zijn.
Nu wil ik dat de makro weet dat hij tot en met regel 3176 moet vullen.
Kan iemand mij hierbij helpen?
Gelogd
Acer 9300 Aspire
Standaard emailprogramma: Outlook Express2007
Standaard Operating System: Windows Vista Standaard Browser:Internet Explorer 7
Office pro 2007

Offline Erik Van Geit

  • Excel-Expert
  • Ervaren lid
  • *****
  • Berichten: 306
  • Geslacht: Man
Re: goto "inhoud van een cel"
« Reactie #1 Gepost op: 05 juni 2007, 12:34:49 »
Hallo,

Dit kan een aanzet geven als A10 een getal bevat, zonder die "A". Als er wel een "A" bij staat gebruik dan de 2de "cnt"regel.
Code: [Selecteer]
Sub test()
Dim cnt As Long

cnt = Range("A10")
'cnt = Application.Substitute(Range("A10"), "A", "")

Range("B2").Copy Range("B2:B" & cnt)
End SubIk vermoed echter dat je in A10 enkel de "laatste rij" bijhoudt. Als dat zo is, kan de code nog verbeterd worden.

beste groeten,
Erik
Gelogd

Offline ErnieMHC

  • Lid
  • *
  • Berichten: 31
  • Geslacht: Man
  • Oplossing.be
Re: goto "inhoud van een cel"
« Reactie #2 Gepost op: 05 juni 2007, 13:36:09 »
harterlijk dank. De A had ik erbij gezet omdat dat handig leek, dus deze heb ik weer weggehaald.
Het werkt! :D :D :D
Gelogd
Acer 9300 Aspire
Standaard emailprogramma: Outlook Express2007
Standaard Operating System: Windows Vista Standaard Browser:Internet Explorer 7
Office pro 2007

Offline Erik Van Geit

  • Excel-Expert
  • Ervaren lid
  • *****
  • Berichten: 306
  • Geslacht: Man
Re: goto "inhoud van een cel"
« Reactie #3 Gepost op: 05 juni 2007, 21:18:36 »
Fijn zo!
Perfectionistische vraag: wat berekent die cell A10?
Gelogd

Offline ErnieMHC

  • Lid
  • *
  • Berichten: 31
  • Geslacht: Man
  • Oplossing.be
Re: goto "inhoud van een cel"
« Reactie #4 Gepost op: 13 juni 2007, 17:05:38 »
Die cel A10 =aantal regels dat is gevuld met waarden uit de sheet.

snap je?

groeten
Arnout
Gelogd
Acer 9300 Aspire
Standaard emailprogramma: Outlook Express2007
Standaard Operating System: Windows Vista Standaard Browser:Internet Explorer 7
Office pro 2007

Offline Erik Van Geit

  • Excel-Expert
  • Ervaren lid
  • *****
  • Berichten: 306
  • Geslacht: Man
Re: goto "inhoud van een cel"
« Reactie #5 Gepost op: 14 juni 2007, 09:09:14 »
Ja, hoor!

Dan heb je wellicht AANTALARG gebruikt of AANTAL.
Als dat enkel dient om de macro te sturen, kan je het ook anders aanpakken zonder die cel.

Code: [Selecteer]
Sub test()
Dim cnt As Long

cnt = Range("A" & Rows.Count).End(xlUp).Row

Range("B2").Copy Range("B2:B" & cnt)
End Sub
Als die macro enkel dient om cellen te copiëren, kan je het evengoed manueel doen.
Selecteer B2
Dubbelklik op het kleine vierkantje rechts onderaan van het "selectiekader".

fijne dag verder!
Erik
Gelogd
Pagina's: [1]   Omhoog
 


www.combell.com