Office: Tabsprung in Tabellen einfügen

Hallo Forum,
gibt es eine Möglichkeit, einen Tabsprung ohne Makro in eine Tabelle einzubauen?
Siehe Beispiel.
Viele Grüße Gerd
[TABLE]
<colgroup><col style="width: 78ptpx"><col width="78pt"><col width="78pt"><col width="78pt"><col width="78pt"><col width="78pt"><col width="78pt"><col width="78pt"></colgroup><tbody>[TR="bgcolor: #cacaca"]
[TD="align: center"]A[/TD]
[TD="align: center"]B[/TD]
[TD="align: center"]C[/TD]
[TD="align: center"]D[/TD]
[TD="align: center"]E[/TD]
[TD="align: center"]F[/TD]
[TD="align: center"]G[/TD]
[TD="align: center"]H[/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: left"]Beispiel[/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: center"]Kd.-Nr.:[/TD]
[TD="align: center"]Kunde[/TD]
[TD="align: center"]Ware1[/TD]
[TD="align: center"]Ware2[/TD]
[TD="align: center"]Ware3[/TD]
[TD="align: center"]Ware4[/TD]
[TD="align: center"]usw.[/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: center"] [/TD]
[TD="align: center"] [/TD]
[TD="align: center"]Rotkohl[/TD]
[TD="align: center"]Eier[/TD]
[TD="align: center"]Steckrüben[/TD]
[TD="align: center"]Wurzeln[/TD]
[TD="align: center"]Petersilie[/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: center"]2010056[/TD]
[TD="align: center"]Meyer[/TD]
[TD="align: center"]5[/TD]
[TD="align: center"]3[/TD]
[TD="align: center"]2[/TD]
[TD="align: center"]1[/TD]
[TD="align: center"]1 Danach Tabsprung von G4 nach A5[/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: center"] [/TD]
[TD="align: center"] [/TD]
[TD="align: center"] [/TD]
[TD="align: center"] [/TD]
[TD="align: center"] [/TD]
[TD="align: center"] [/TD]
[TD="align: center"] [/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[/TR]
</tbody>[/TABLE]
[TABLE]
<tbody>[TR]
[TD]Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg[/TD]
[/TR]
</tbody>[/TABLE]

 

Hallo Gerd,

etwas verwirrend deine Frage ... Denn von alleine passiert ja bekanntlich gar nichts :).

Solltest du meinen, dass bei einem [Tab] automatisch beispielsweise von G4 nach A5 gesprungen werden soll, dann musst du die Tabellenfelder (Zellen) alle sperren und nur die freigeben, wo Einträge möglich sein sollen.

 

Danke cpt. Nemo,
einfach aber wirksam.
Gruß Gerd

 

Hallo Gerd,

in der beiliegenden Excel-Datei habe im Codemodul für das Arbeitsblatt "Tabelle1" ein Makro integriert, das die von Dir gewünschte Steuerung der aktiven Zelle durchführt.
1) Befindet sich die aktive Zelle links von der Spalte H und drückt man die ENTER-Taste, springt die aktive Zelle in die Zelle rechts davon (horizontale Bewegung), bis sie schließlich zur Spalte H käme. Dann allerdings springt die aktive Zelle in die nächste Zeile der Spalte A.
2) Befindet sich die aktive Zelle jedoch rechts der Spalte H, so führt das Drücken der ENTER-Taste zu senkrechten Bewegung der aktiven Zelle (standardmäßiges Verhalten).

Nachfolgend noch das Makro, das dieses Verhalten steuert:

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Cells.Count > 1 Then Exit Sub
  '
  If Target.Column < 8 Then
    Application.MoveAfterReturnDirection = xlToRight
  Else
    Application.MoveAfterReturnDirection = xlDown
  End If
  '
  If Target.Column = 8 Then
    Me.Cells(Target.Row + 1, 1).Select
  End If
  '
End Sub

 

Danke Anton Exl,
aber ich wollte extra wissen, ob es auch ohne Makro möglich ist. Da ist mir die Lösung von cpt. Nemo doch lieber, da auch von mir Makro Laien diese Aktion in vielen Tabellen eingebaut werden kann.
Gruß Gerd