Toon posts:

[excel | vba] rijselectie opheffen

Pagina: 1
Acties:
  • 943 views sinds 30-01-2008
  • Reageer

Verwijderd

Topicstarter
Hoi.

Hoe hef ik een selectie op een rij op?

Ik heb de volgende code:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Sub GegevensWegschrijven()

Application.ScreenUpdating = False
    
    'oude gegevens kopieren
    Sheets("Basisgegevens").Select
    Rows("" & Teller & ":" & Teller).Select
    Selection.Copy
    
    Rows("20:20").Select
    ActiveSheet.Paste
    
    'op die regel de waarden zetten
    
    '>>nog niet ingevuld
          
    'en hef die rottige selectie weer op.
    'Rows("" & Teller & ":" & Teller).Deselect

Application.ScreenUpdating = True
       
End Sub

Waarnij ik hiervoor dus een geldig alternatief moet hebben:
Rows("" & Teller & ":" & Teller).Deselect

't zal vast wel simpel zijn, maar kon 't niet vinden.

Verwijderd

Topicstarter
Ok, dit heb ik nu gevonden (was even vergeten dat je ook gewoon ouderwets een macro op kunt nemen en dan kunt copy-pasten :))

Nu wat anders:
Als ik Application.ScreenUpdating = False gebruik, dan update ie dus gelijk het hele scherm niet... is het ook mogelijk alleen de werkbladen niet visueel te updaten?

  • TRON
  • Registratie: September 2001
  • Laatst online: 19-12 21:31
Ik wil je heel graag helpen, maar ik snap je tweede vraag niet echt, zou je iets specifieker willen zijn?

O-)

Leren door te strijden? Dat doe je op CTFSpel.nl. Vraag een gratis proefpakket aan t.w.v. EUR 50 (excl. BTW)


  • Case
  • Registratie: Oktober 2000
  • Laatst online: 12:30
onder MS word kon je de selectie altijd opheffen met Selection.Collapse
Dus het zal onder excel ook wel werken neem ik aan.

Mijn Firewizzie


Verwijderd

Topicstarter
Nou, betreffende de tweede vraag: het updaten van het scherm (de excel sheet) vertraagd mijn applicatie aanzienlijk. Daarom zet ik dus de screenupdating uit. Echter, door het uitzetten van deze 'updating' worden ook de vensters e.d. niet meer geupdate, dus als je bijvoorbeeld een nieuw venster opent en de oude unload, dan blijft deze staan. Dit gebeurt ook bij het verplaatsen.

Wellicht dat mijn kopieerfunctie niet optimaal is, dat zou natuurlijk ook kunnen. Maar het is een relatief simpele bewerking zou ik zo zeggen...

Verwijderd

wat dacht je van Cells(Teller,1).Select ???

Verwijderd

Topicstarter
Met als voordeel?
Pagina: 1