Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
768to772
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
768to772
768to772
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spaltenüberschriften fortlaufend beschriften

Spaltenüberschriften fortlaufend beschriften
30.05.2006 12:53:14
Peter
Hallo Excel-Profis :-)
Habe folgende Aufgabe:
Ich habe eine Excel-Liste mit Spaltenüberschriften erstellt (siehe Anhang https://www.herber.de/bbs/user/33996.xls
). in die erste leere Zelle in der Überschriftenzeile sollen die Überschriften (beginnend jedoch mit der Überschrift aus Spalte F) mit fortlaufender Nummerierung kopiert werden. Bsp.:
Spaltenüberschriften: A B C D E F G... AZ, F1 G1 H1....AZ1, F2 G2 H2...AZ2,....bis F41 G41 H41...AZ41
Kann mir da jd. von euch helfen? Wäre euch sehr dankbar :-)
Viele Grüße
Bayram

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spaltenüberschriften fortlaufend beschriften
30.05.2006 13:03:47
Reinhard
Hi Peter,
soll das dann so aussehen:
Tabellenblattname: Tabelle1
A    B    C    D    E    F
1  F1   G1   H1   I1   J1   K1
2  F2   G2   H2   I2   J2   K2
3  F3   G3   H3   I3   J3   K3
4  F4   G4   H4   I4   J4   K4
Benutzte Formeln:
A1:  =Peter
A2:  =Peter
A3:  =Peter
A4:  =Peter
B1:  =Peter
B2:  =Peter
B3:  =Peter
B4:  =Peter
C1:  =Peter
C2:  =Peter
C3:  =Peter
C4:  =Peter
D1:  =Peter
D2:  =Peter
D3:  =Peter
D4:  =Peter
E1:  =Peter
E2:  =Peter
E3:  =Peter
E4:  =Peter
F1:  =Peter
F2:  =Peter
F3:  =Peter
F4:  =Peter
Namen in der Tabelle:
Peter:  =ZEICHEN(69+SPALTE())&ZEILE()

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Spaltenüberschriften fortlaufend beschriften
30.05.2006 16:24:41
Peter
Hallo Reinhard,
vielen Dank für deine Antwort. Ich habe die vorhin angehängte Datei etwas verändert, du kannst nun daraus erkennen, wie ich das meine. https://www.herber.de/bbs/user/34006.xls
Die Überschriften sollen alle in der 1.Zeile hintereinander stehen.
Vielen Dank
AW: Spaltenüberschriften fortlaufend beschriften
30.05.2006 16:34:09
u_
Hallo,
das sind 41x46+5=1891 Spalten! Das geht nicht, da du nur 256 Spalten hast.
Gruß
Geist ist geil!
(Dies ist ein allgemeines Statement und nicht an bestimmte Personen gerichtet.)
AW: Spaltenüberschriften fortlaufend beschriften
31.05.2006 17:14:51
Peter
Hallo,
da hast du natürlich vollkommen recht. Sorry mein Fehler. Wie kann ich denn das beschriebene Problem lösen, wenn bis zur 256.Spalte wiederholt werden soll? Könnt ihr mir da weiterhelfen? Vielen Dank
Anzeige
AW: Spaltenüberschriften fortlaufend beschriften
31.05.2006 19:05:15
Bernd
Hallo Peter,
schau Dir mal die Beispielmappe an, da habe ich Dir mal eine Formel gebastelt:
https://www.herber.de/bbs/user/34048.xls
Gruß Bernd
AW: Spaltenüberschriften fortlaufend beschriften
01.06.2006 10:08:42
Peter
Hallo Bernd,
vielen Dank für die Formel. Das klappt wunderbar. Kann ich das auch per Makro automatisch erledigen lassen? Ich habe bereits ein Makro erstellt und würde diese Funktion gerne noch einfügen. Hat da jd. eine Idee?
Vielen Dank, VG Bayram
AW: Spaltenüberschriften fortlaufend beschriften
01.06.2006 11:48:22
Reinhard
Hi Peter,
Option Explicit
Sub tt()
Dim n, nn, adr, spa
On Error Resume Next
Range("A1:E1") = Split("A B C D E")
spa = 5
For n = 0 To 4
For nn = 0 To 46
spa = spa + 1
If spa > 256 Then Exit For
adr = Split(Cells(1, nn + 6).Address, "$")
If n > 0 Then
Cells(1, spa) = adr(1) & n
Else
Cells(1, spa) = adr(1)
End If
Next nn
Next n
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Spaltenüberschriften fortlaufend beschriften
01.06.2006 15:40:10
Peter
Hallo Reinhard :-)
Vielen Dank für dein Makro. Klappt wunderbar. Das Einzige was jedoch noch geändert werden müsste ist, dass die bereits bestehenden Überschriften mit diesem Makro einfach mit A B usw. überschrieben werden. Die Buchstaben hatte ich jedoch nur zur Vereinfachung angegeben. In Wirklichkeit stehen Wörter in den Spaltenüberschriften und diese sollen dann mit fortlaufender Nummerierung kopiert werden. Hat dafür von euch jd. auch ein Makro bereit? Hoffe, das ist verständlich. Vielen vielen Dank, Grüße aus Bayern
AW: Spaltenüberschriften fortlaufend beschriften
03.06.2006 01:37:26
Reinhard
Hi Peter,
lade bitte mal ne Beispieltabelle hoch mit 2 Tabellenbättern, Tab1 wies ausieht, Tab2 wies ausssehen soll.
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige

301 Forumthreads zu ähnlichen Themen

VBA Zeilen ein/ausblenden + weiters Problem
oblivion

hallo, ich hab mal wieder ein kleines und ein etwas größeres Problem
erstmal zum kleinen. wie bekomme ich es mit hilfe von einem vba hin, wenn ich ein kontrollkästchen mit einem Hacken versehe, dann bestimmte Zeilen (Sagen wir mal Zeile 20 bis 30), die ich vorher versteckt hatte, nun zum vo...
10.08.2008 00:22:06
Thread-ID: 1000558
3 Beiträge
Anzeige
Kann jemend ein VBA Kurs empfehlen
TomTom

Hi,
ich soll von meiner Firma aus eine VBA (Excel) Kurs besuchen, so 3-4 Tage. Kann jemand ein Institut empfehlen, das solche qualifizierte Kurse anbietet ?
Danke Tom
10.10.2008 11:51:00
Thread-ID: 1015544
6 Beiträge
Werte in verschiedenen Subs verwenden
Urs

Liebe Alle
Ich wähle eine Zelle aus und speichere die gesamte Selection in einerObject-Variable (Rechtsklick auf Zelle, Start eines Makros aus dem kontextsensitiven Menue).
Dann gehe ich auf ein anderes Sheet (innerhalb des gleichen Workbooks) und wähle eine Zelle darin an. (Rechtsklic...
30.10.2008 12:53:41
Thread-ID: 1020565
3 Beiträge
Anzeige
VBA, Notiz ein- und wieder ausblenden
Burghard

Hallo ins Netz,
ich möchte mit Knopfdruck ein Textfeld (mit Inhalt, es existiert schon) oder ein Autoformat (z.B. Gefaltete Ecke) auf dem Blatt an einer bestimmten Stelle für 1 Minute plazieren und danach soll es wieder verschwinden. Also kopieren und dann automatisch die Kopie wieder lösc...
01.12.2008 09:08:18
Thread-ID: 1029158
2 Beiträge
VBA: String+TAB an inaktives Windowsfenster senden
Melanie

Hallo allerseits,
ich moechte aus Excel heraus mit VBA code einen String (z.b "Hallo") + TAB (oder ENTER) an ein 'fremdes' WindowsapplicationFenster schicken (keine Officeanwendung), wobei das Fensterhandle (oder auch das entsprechende TextFeldHandle bekannt sind).
Allerdings soll die...
09.12.2008 08:37:52
Thread-ID: 1031241
9 Beiträge
esc Endlosschleife beenden
Michael

Hallo!
Benötige eine Schleife die die ganze Zeit im Hintergrund läuft. Bei ESC soll sie abgebrochen werden.
Mein Bescheidener Versuch!
Private Declare Function GetAsyncKeyState Lib "user32" _
(ByVal vKey As Long) As Integer
Sub Schleife()
Do
DoEvents
If (GetAsync...
22.01.2009 19:46:00
Thread-ID: 1042718
8 Beiträge
Kurze Variablendeklaration in VBA?
Gunnar

Hi Leute,
gibt es in VBA keine andere Möglichkeit, Variable zu deklarieren außer
Dim abc As Integer, abd As Integer abe As Integer
usw.? Brauch über 100 Variable, das ist mühselig.
Typenkennzeichen dürfen übrigens nicht verwendet werden, falls das wichtig ist.
Grüße Gunnar...
28.01.2009 18:36:11
Thread-ID: 1044672
5 Beiträge
Variablendeklaration über Sub hinaus
bruno

hallo
Meine Variable möche ich auch in den untersub abfragen.
Wenn ich sie im ersten sub definiere mit "Private easy As String" gibt es eine Fehlermeldung "Ungültiges Attribut in Sub oder Fuktion". Wie muss ich es definieren, damit ich es auch abfragen kann?
danke
de Bruno
17.04.2009 11:44:38
Thread-ID: 1069290
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
23
5
2
6
1
8
7
4
3
8
2
4
21
1
6
7
3
3
2
4
11
2
4
4