Tweede View. Excel Werkblad

[domfree]

Hallo allemaal,

Ik doe nu mijn tweede week stage in een tamelijk groot bedrijf.
Een werknemer heeft een planning opgemaakt met alle werken,kosten,etc..
Hij heeft me gevraagd of ik bepaalde kolommen kan verbergen (Kan ik hoor :d)
MAAR hij wil dat dit een tweede view is.
Met andere woorden -> Hij wil de gegevens met de verborgen kolommen kunnen laten zien aan de andere werknemers, maar als hij gegevens wil toevoegen of aanpassen moet hij dit onmiddellijk kunnen doen zonder telkens opnieuw de kolommen weer zichtbaar te maken.

Hopelijk is mijn vraag duidelijk en krijg ik snel een oplossing!

Alvast bedankt

Domfree

 

[sylvester-ponte]

hoi domfree

neem een macro op met je handelingen om de kolommen te verbergen.
en nog een om de kolommen weer zichtbaar te maken.

en koppel deze aan een knop of iets anders.

als je wil dat iemand dat hier voor je doet geef dan even de te verbergen kolommen aan

groet sylvester

 

[Cobbe]

Via Gegevens - Groeperenkun je de verborgen kolommen groeperen.
Je krijgt dan boven die kolommen een + of - en kun je de kolommen zichtbaar maken of verbergen.

Succes, Cobbe

 

[domfree]

Alvast bedankt voor de snelle reactie!
Maar, een klein probleempje, ik werk nog met Office 2003.
Waar kan ik dit hier vinden?

mvg
Domfree

 

[Cobbe]

Data-Overzicht-Groeperen.

Succes, Cobbe

 

[domfree]

Bedankt!

@sylvester-ponte
Ik heb het geprobeerd met een macro
Ik moet enkel Kolom E-> H & K->Y zichtbaar hebben
Dit is mijn code:


Sub Verbergen()
'
' Verbergen
Columns("A").Select
Range("D1").Activate
Selection.EntireColumn.Hidden = True
Columns("I:J").Select
Range("I2").Activate
Selection.EntireColumn.Hidden = True
ActiveWindow.ScrollColumn = 1
ActiveWindow.ScrollColumn = 6
ActiveWindow.ScrollColumn = 7
ActiveWindow.ScrollColumn = 8
ActiveWindow.ScrollColumn = 7
ActiveWindow.ScrollColumn = 6
ActiveWindow.ScrollColumn = 5
Columns("F:F").Select

End Sub
Sub Weergeven()
' Weergeven
Cells.Select
Range("E1").Activate
Selection.EntireColumn.Hidden = False
Range("A1").Select
End Sub

Voor een of andere reden wanneer ik nu verbergen doe, verbergt ie alle kolommen buiten X & Y..
Oplossing? ^^
Kan het bestand niet uploaden aangezien het privégegevens zijn van de onderneming

Toch bedankt!

 

[domfree]

Sub Verbergen()
'
' Verbergen
Columns("A").Select
Range("D1").Activate
Selection.EntireColumn.Hidden = True
Columns("I:J").Select
Range("I2").Activate
Selection.EntireColumn.Hidden = True
End Sub

In rij E1 tot W1 is een samengevoegde cel..
En aangezien I1 daar ook in zit, verbergt hij Kolommen E t.e.m. W...
Hoe los ik dit op?

MVG
Domfree

 

[Cobbe]

Door die samengevoegde cel te ontbinden.
Je kunt dit opvangen door de tekst te spreiden over de selectie, zie maar bij celeigenschappen- horizontaal.

Cobbe

 

[domfree]

Hartelijk dank! Precies wat ik nodig had!

MVG
Domfree