*

Help!

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

Hulp bij posten

Recente topics

Pagina's: [1]   Omlaag

Auteur Topic: Checken bepaald gebied empty?  (gelezen 1842 keer)

0 leden en 1 gast bekijken dit topic.

Offline Justaguy

  • Lid
  • *
  • Berichten: 86
  • Wie zoekt, die vindt ... het in Oplossing.be
Checken bepaald gebied empty?
« Gepost op: 04 februari 2006, 21:03:28 »
Hallo, alles dient te gebeuren via een macro.
Veronderstel dat je eerst moet zoeken in de kolom A naar een bepaald woord bv."test". Éénmaal gevonden is het de bedoeling dat de 3 rijen en 5 kolommen naar rechts gekeken wordt of dit gebied leeg is. Zo ja, dient opdracht 1 uitgevoerd te worden en anders opdracht 2.

Ik heb vooral problemen met het checken van het vereiste (variabele) gebied.

Thx.
Gelogd
SYSTEEM: AMD Athlon 1Ghz - 256Mb RAM - Win XP - Office2003 – kabel)

Offline barthold

  • Volledig lid
  • **
  • Berichten: 171
  • ExWorks.be: Free Excel tools.
Re:Checken bepaald gebied empty?
« Reactie #1 Gepost op: 05 februari 2006, 14:16:09 »
als het over 1 cel gaat, kan je de offset property van een range gebruiken: range().offset()="".

als het gebied groter is dan 1 cel, maar begint op 3R&5K, moet je de worksheet offset functie gebruiken, daar kan je de grootte van het offset gebied definiëren....

bart
Gelogd
WinXP - Excel 2000/XP/2003

Offline Justaguy

  • Lid
  • *
  • Berichten: 86
  • Wie zoekt, die vindt ... het in Oplossing.be
Re:Checken bepaald gebied empty?
« Reactie #2 Gepost op: 05 februari 2006, 21:21:18 »
Hallo Bart,
kun je uw suggestie iets duidelijker formuleren.

    Application.Goto Reference:="R1C1"
    ActiveCell.Columns("A:A").EntireColumn.Select
    Selection.Find(What:="klas", After:=ActiveCell, LookIn:= _
        xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
        xlNext, MatchCase:=False).Activate

'selecteer het gebied van 3rijen en 5kolommen
    ActiveCell.Offset(3, 0).Range("A1:E3").Select
'kijk na of geselecteerde gebied leeg is

    en dan weet ik het niet meer  ???
Gelogd
SYSTEEM: AMD Athlon 1Ghz - 256Mb RAM - Win XP - Office2003 – kabel)

Offline barthold

  • Volledig lid
  • **
  • Berichten: 171
  • ExWorks.be: Free Excel tools.
Re:Checken bepaald gebied empty?
« Reactie #3 Gepost op: 06 februari 2006, 20:33:53 »
Justaguy,

Eerst en vooral: selecteren van objecten is niet nodig in vba... Om efficiënt te werken, laat je best de .goto's en .select's achterwege...

Kijken of cel 3R,5K verwijderd van actieve cel leeg is:
activecell.offset(3,5).value="". Als het om meerdere cellen gaat zul je moeten loopen in VBA door alle rijen/kolommen, want de =OFFSET functie is niet beschikbaar in VBA. Die laatste functie laat in een worksheet wel toe de grootte van het gebied te bepalen...

Bart
Gelogd
WinXP - Excel 2000/XP/2003
Pagina's: [1]   Omhoog
 


www.combell.com