SOLVED

Text einer Liste in einer Zelle am Anfang beginnend

Copper Contributor

Mit Text befüllte Zelle als Liste, die täglich länger wird:

Werterhalt_1-1662110460919.png

Öffne ich die Zelle erscheint der die Mitte der Liste:

 

Werterhalt_2-1662111230193.png

 

Ich muss also jedes mal mit dem Curor nach oben scrollen, um zum Anfang der Liste zu gelangen

um einen neuen Eintrag vornehmen zu können:

Werterhalt_3-1662111379636.png

 

Auf einem anderen PC erscheint nach dem Öffnen diese Liste gleich am Anfang, ohne dass ich scrollen müsste.

 

Leider weiß ich nicht, wo ich an meinem Desktop-PC die Einstellung dafür vornehmen kann.

 

Viele Grüße an alle


Wolfgang

 

 

4 Replies
best response confirmed by Werterhalt (Copper Contributor)
Solution

@Werterhalt 

What speaks against it than pressing the combination CTRL + Home after opening the folder? :))

 

or with a VBA macro for a sheet...

 

Private SubWorkbook_Open()
Sheets("yourSheet").Activate
Range("A1").Select
end sub

 

 

or VBA macro on the whole workbook.

How to always at cell A1 when opening workbook?

 

Private Sub Workbook_SheetActivate(ByVal Wsh As Object)
On Error Resume Next
Wsh.Range("A1").Select
End Sub

 

 

Hope I was able to help you with this info.

 

NikolinoDE

I know I don't know anything (Socrates)

@NikolinoDE 

You wrote: "

What speaks against it than pressing the combination CTRL + Home after opening the folder? :))"

Thank you so much. That helps. Did not know that combination.

 

macro:
is that also possible gloal within an open cell, as I asked?

 

 

(Sorry for by inpropriate english).

 

@Werterhalt 

 

 

1 best response

Accepted Solutions
best response confirmed by Werterhalt (Copper Contributor)
Solution

@Werterhalt 

What speaks against it than pressing the combination CTRL + Home after opening the folder? :))

 

or with a VBA macro for a sheet...

 

Private SubWorkbook_Open()
Sheets("yourSheet").Activate
Range("A1").Select
end sub

 

 

or VBA macro on the whole workbook.

How to always at cell A1 when opening workbook?

 

Private Sub Workbook_SheetActivate(ByVal Wsh As Object)
On Error Resume Next
Wsh.Range("A1").Select
End Sub

 

 

Hope I was able to help you with this info.

 

NikolinoDE

I know I don't know anything (Socrates)

View solution in original post