Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
608to612
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
608to612
608to612
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Namen für Spalten automatisch vergeben

Namen für Spalten automatisch vergeben
07.05.2005 19:30:18
Erich
Hallo EXCEL-Freunde,
in einer großen Datei mit Formeln vergebe ich zur besseren Übersicht für viele
Spalten Namen, die ich dann bei den Formeln verwenden kann.
Besteht eine Möglichkeit diese Namensvergabe noch zu verbessern, indem immer
der Zelleninhalt der zweiten Zeile in der Spalte automatisch als Name für
die Spalte herangezogen wird:
März
  
 ABC
1   
2Test1Test2Test3
3adg
4beh
5cfi
 
 Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  

Hier würden also die Namen wie folgt lauten:

Spalte A: Test1

Spalte B: Test2

Spalte C: Test3

Optimal wäre eine Anpassung des Namens wenn sich der Zellinhalt in der zweiten

Zeile ändert.

Besten Dank für eine Hilfe!

mfg 

Erich

EXCEL-Shareware und Freeware: http://www.toolex.de

EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com

                    


            


    
    



    
    

    
    
    

    

        

                        
            19
            
Beiträge zum Forumthread

            
Beiträge zu diesem Forumthread

        

    

    

                    

                
                Betreff
            

            
Datum

            
Anwender

            

    
    


    
Anzeige

    

        
                    
            
                
    



    
    



    
            
                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Namen für Spalten automatisch vergeben
                                            

                    

                                                    07.05.2005 20:02:03
                                            

                                

                                            serge
                                    

            

        

        

                            
Du mustt A1 bis C2 anklicken und aus dem Menübefehl Einfügen/Namen/Erstellen/aus unterster Zeile übernehmen (OK) dann hast in den oberen Zellen den Namen des Inhaltes der 2.Zeile vergeben.

serge

                    


            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Namen für Spalten automatisch vergeben
                                            

                    

                                                    07.05.2005 21:09:11
                                            

                                

                                            Erich
                                    

            

        

        

                            
Hallo serge,

damit werden zwar die Inhalte der Zellen zu Namen; der Name bezieht sich dann aber auf

die erste Zelle der Spalte. Insofern müssten alle Namen nochmals einzeln nachjustiert werden.

mfg 

Erich

EXCEL-Shareware und Freeware: http://www.toolex.de

EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com

                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Namen für Spalten automatisch vergeben
                                            

                    

                                                    07.05.2005 22:09:07
                                            

                                

                                            serge
                                    

            

        

        

                            
erich

Du mustt A1 bis C2 anklicken und aus dem Menübefehl Einfügen/Namen/Erstellen/aus unterster Zeile übernehmen (OK) dann hast in den oberen Zellen den Namen des Inhaltes der 2.Zeile vergeben.					

NEU					

Danach die Ganze Tabelle von Zeile 2-5 nach Zeile 1 kopieren und letzte Zeile löschen

serge				

                    


            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Namen für Spalten automatisch vergeben
                                            

                    

                                                    08.05.2005 13:08:47
                                            

                                

                                            Erich
                                    

            

        

        

                            
Hallo serge,

das Ergebnis bleibt aber doch insofern gleich, als die Namen sich immer nur auf die

erste Zelle der Zeile beziehen?

Die Namen sollen aber immer für die ganze Spalte gelten; ferner muss ich die Zeile 2 belassen;

die Werte darf ich nicht auf die erste Zeile übertragen.

Noch eine Idee?

Besten Dank nochmal!

mfg 

Erich

EXCEL-Shareware und Freeware: http://www.toolex.de

EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com

                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


                    
                                
            
                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Noch eine Idee
                                            

                    

                                                    08.05.2005 18:04:26
                                            

                                

                                            Erich
                                    

            

        

        

                            
Hallo serge,

so funktioniert das; für den Zweck kann ich kurzzeitig meine Werte aus Zeile2 in Zeile1

kopieren und dann die Zeilen1 wieder zurücksetzen.

Aktualisieren bei Änderung des zellinhalts geht allerdings nicht;

insofern verfolge ich noch immer den Vorschlag von Reinhard mit dem auch diese Frage

gelöst werden könnte.

Besten Dank!!

mfg 

Erich

EXCEL-Shareware und Freeware: http://www.toolex.de

EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com

                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Noch eine Idee
                                            

                    

                                                    08.05.2005 19:19:21
                                            

                                

                                            Reinhard
                                    

            

        

        

                            
Hallo Erich,

sorry, wahrscheinlich war da auch ein Fehler drin,

nicht getestet aber müsste klappen
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 2 Then Exit Sub
ActiveWorkbook.Names.Add Name:=Target, RefersTo:="=$" & Chr(64 + Target.Column) & ":$" & Chr(64 + Target.Column)
End Sub


Gruß

Reinhard

                    


            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Noch eine Idee
                                            

                    

                                                    08.05.2005 21:32:05
                                            

                                

                                            Erich
                                    

            

        

        

                            
Hallo Reinhard,

das funktioniert jetzt!!

Besteht noch eine Möglichkeit, beim Change-Ereignis nicht nur die neue Namensbezeichnung

anzupassen, sondern auch die alte zu löschen?

Wenn ich derzeit in Spalte B, Zeile2 eine Änderung vornehme habe ich für die Spalte B

zwei Namensbezeichnungen.

Besten Dank nochmal!!

mfg 

Erich

EXCEL-Shareware und Freeware: http://www.toolex.de

EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com

                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Noch eine Idee
                                            

                    

                                                    08.05.2005 23:09:32
                                            

                                

                                            Reinhard
                                    

            

        

        

                            
Hallo Erich,

ungetestet,
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 2 Then Exit Sub
For Each na In ThisWorkbook.Names
If Right(na, 4) = "$" & Chr(64 + Target.Column) & ":$" & Chr(64 + Target.Column) Then ActiveWorkbook.Names(na.Name).Delete
Next na
if target <> "" then ActiveWorkbook.Names.Add Name:=Target, RefersTo:="=$" & Chr(64 + Target.Column) & ":$" & Chr(64 + Target.Column)
End Sub


Gruß

Reinhard

                    


            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Noch eine Idee
                                            

                    

                                                    09.05.2005 06:43:27
                                            

                                

                                            Erich
                                    

            

        

        

                            
Hallo Reinhard,

danke - der Code läuft zwar reibungslos, die Löschung geht aber noch nicht.

Habe noch etwas "rumprobiert", aber da reichen meine Kenntnisse nun doch nicht.

Besten Dank nochmal!

mfg 

Erich

EXCEL-Shareware und Freeware: http://www.toolex.de

EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com

                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Noch eine Idee
                                            

                    

                                                    09.05.2005 09:14:09
                                            

                                

                                            Reinhard
                                    

            

        

        

                            
Hallo Erich,

sorry für die Zeitverzögerung durch mich .

Ne Winzigkeit war noch falsch, nimm 

If Right(na, 5)...

Gruß

Reinhard

                    


            


    
    


                    
                                
            
                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Noch eine Idee
                                            

                    

                                                    11.05.2005 15:09:46
                                            

                                

                                            Reinhard
                                    

            

        

        

                            
Hallo Erich,

eija, $E:$E hat 5 (und nicht 4 wie ich erst zählte) Buchstaben und da , besonders bei längerem Code die Änderung eines einzelnen Buchstaben leicht übersehen werden, mach ich hn blinkend um es leichte erkennbar zu machen.

Gruß

Reinhard

                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


                    
                                
            
                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Namen für Spalten automatisch vergeben
                                            

                    

                                                    07.05.2005 20:05:09
                                            

                                

                                            Reinhard
                                    

            

        

        

                            
Hallo Erich,

ungetestet:



Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 2 Then Exit Sub
ActiveWorkbook.Names.Add Name:=Target.Value, RefersToR1C1:="=Tabelle1!$" & Chr(64 + Target.Column) & "$" & Chr(64 + Target.Column)
End Sub



Gruß

Reinhard

                    


            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Namen für Spalten automatisch vergeben
                                            

                    

                                                    07.05.2005 21:12:02
                                            

                                

                                            Erich
                                    

            

        

        

                            
Hallo Reinhard,

hab das mal ausprobiert und kann noch nicht erkennen was der Code bewirkt. Kannst

Du nachhelfen?

Besten Dank nochmals!

mfg 

Erich

EXCEL-Shareware und Freeware: http://www.toolex.de

EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com

                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Namen für Spalten automatisch vergeben
                                            

                    

                                                    08.05.2005 16:20:42
                                            

                                

                                            Reinhard
                                    

            

        

        

                            
Hallo Erich,

Alt+F11, Doppelklick auf tabellenblattnamen , dorthinein gehört der Code.

Sobald du in Zeile 2 in irgendeiner zelle was eingibst, so wird für die akt. Spalte der Name aus dieser Zelle vergeben. Das ist doch was du willst?

Und wenn du schon Werte in Zeie2 stehen hast, so lass einmalig dieses makro laufen:


sub tt()
for n = 1 to 256
if cells(2,n)<>"" then
ActiveWorkbook.Names.Add Name:=cells(2,n), RefersToR1C1:="=Tabelle1!$" & Chr(64 +n) & "$" & Chr(64 + n)
end if
next n
end sub



Gruß

Reinhard

                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Namen für Spalten automatisch vergeben
                                            

                    

                                                    08.05.2005 16:32:07
                                            

                                

                                            Erich
                                    

            

        

        

                            
Hallo Reinhard,

der Code Sub tt() bringt Fehlermeldung:

Laufzeitfehler 1004

Die eingegebene Formel enthält einen Fehler.

(Tabelle1 habe ich an meine Tabelle angepasst)

Besten Dank nochmal!

mfg 

Erich

EXCEL-Shareware und Freeware: http://www.toolex.de

EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com

                    


            


    
    


                    
                                
            

    
    

        

            
            

                                    

                                                    
                            AW: Namen für Spalten automatisch vergeben
                                            

                    

                                                    08.05.2005 18:44:25
                                            

                                

                                            Reinhard
                                    

            

        

        

                            
Hallo Erich,

ich hatts nicht getestet weil es eine makroaufzeichnung ausspuckte.

Jetzt habe ich es getestet.


Sub tt()
For n = 1 To 256
If Cells(2, n) <> "" Then
ActiveWorkbook.Names.Add Name:=Cells(2, n).Value, RefersTo:="=$" & Chr(64 + n) & ":$" & Chr(64 + n)
End If
Next n
End Sub>/pre>
Gruß
Reinhard





                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


            
    
            


    

        
                126 Forumthreads zu ähnlichen Themen
    

    
    

        

            
                
        

                           
                

                    

                        

                            
                            Registerblattname automatisch ändern | Herbers Excel-Forum
                        

                                                    

                                Christian Wendker
                            

                                            

                    

                                                
Hallo Spezilisten!

Habe ein Problem mit den Registerblattnamen. Ich habe auf der ersten Registerkarte eine Liste mit Namen und möchte jetzt die folgenden Registerkarten nach diesen Namen benennen. Außerdem sollen diese sobald ich einen Namen in der Liste ändere automatisch mit geändert werden.<...
                    

                    

                        

                                                            17.01.2010 01:43:42
                                                    

                        

                            Thread-ID:
                            1130550
                        

                        

                            4
                            Beiträge
                        

                    

                

                
                    

                   
                
        

                            

                    


    
Anzeige

    

        
                    
            
                
    



                

                    

                   
                
        

                           
                

                    

                        

                            
                            Automatische Änderung "Name Tabellenblatt"
                        

                                                    

                                Wolfgang
                            

                                            

                    

                                                

Hallo an alle,

ich habe folgendes Problem: wenn in L7 der Wert geändert wird, soll automatisch der Name des

Tabellenblattes geändert werden.

Beispiel: L7 = 2010, wird geändert auf 2011: Der Name des Tabellenblatt's soll nun ebenfalls 2011 sein.

Wie kriege ich das hin?

Mit Gr...
                    

                    

                        

                                                            20.11.2010 16:46:20
                                                    

                        

                            Thread-ID:
                            1187949
                        

                        

                            3
                            Beiträge
                        

                    

                

                
                    

                   
                
        

                           
                

                    

                        

                            
                            Automatisches Umbenennen von Tabellenblätter
                        

                                                    

                                Tabellenblätter
                            

                                            

                    

                                                

Hallo Excel Freunde

Ich habe eine Tabelle mit ca. 250 Namen.

Nun möchte ich für jeden Namen ein eigenes Tabellenblatt einrichten. anstatt Tabelle1, Tabelle2 soll der Name erscheinen.

Ist es möglich dies per „Befehl“ auszuführen. Ist es weiterhin möglich dies noch per Hyperlink (pro...
                    

                    

                        

                                                            21.06.2012 15:09:53
                                                    

                        

                            Thread-ID:
                            1268303
                        

                        

                            7
                            Beiträge
                        

                    

                

                
                    

                   
                
        

                            

                    


    
Anzeige

    

        
                    
            
                
    



                

                    

                   
                
        

                           
                

                    

                        

                            
                            Datei kopieren und nach Zelle benennen
                        

                                                    

                                Lisa
                            

                                            

                    

                                                

Hallo zusammen.

ich würde gerne Datei "X" von \OrdnerA\ nach \OrdnerB\ kopieren.

In Zelle A1 vom Blatt1 steht das morgige Datum.

Die kopierte Datei soll nun nach A1 in Blatt1 benannt werden, sprich in etwa so:

"TTT_MM_JJ_X"

Ich habe bereits versucht eine neue Datei in \Ordne...
                    

                    

                        

                                                            27.11.2014 15:36:42
                                                    

                        

                            Thread-ID:
                            1394972
                        

                        

                            10
                            Beiträge
                        

                    

                

                
                    

                   
                
        

                           
                

                    

                        

                            
                            Tabellenblätter automatisch erstellen und benennen
                        

                                                    

                                Bonduca
                            

                                            

                    

                                                

Hallo,

ich habe folgendes Problem:

In Tabelle 1 sind in der Spalte B (ab B4) Bezeichnungen. Die Anzahl dieser kann variieren. Mit diesen Bezeichnungen sollen neue Tabellenblätter automatisch erstellt werden.

In der Beispieldatei habe ich bereits die Tabellenblätter angelegt.

Auß...
                    

                    

                        

                                                            24.02.2015 19:51:33
                                                    

                        

                            Thread-ID:
                            1411292
                        

                        

                            5
                            Beiträge
                        

                    

                

                
                    

                   
                
        

                           
                

                    

                        

                            
                            Neues Blatt automatisch erstellen und umbenennen
                        

                                                    

                                Jean
                            

                                            

                    

                                                
Liebe Forums-user,

ich habe folgendes, mehr oder weniger schwieriges Problem:

Ich habe in einem Blatt 1 Kontobewegungen. Jede Kontobewegung wird dabei u.a. einer Kategorie zugeordnet. Für jede Kategorie soll ein eigenes Blatt bestehen, in dem dann nur die entsprechenden Kontobewegungen dies...
                    

                    

                        

                                                            09.03.2015 18:02:51
                                                    

                        

                            Thread-ID:
                            1413829
                        

                        

                            7
                            Beiträge
                        

                    

                

                
                    

                   
                
        

                           
                

                    

                        

                            
                            Tabellenblätter automatisch nach Zellen benennen
                        

                                                    

                                Fabian
                            

                                            

                    

                                                

Hallo

ich brauche für meine Excel-Tabelle ein Makro, das automatisch den Namen mehrerer Tabellenblätter ändert, sobald ich den Wert einer Zelle ändere.

In der Tabelle 1 trägt man ein Jahr ein, das in den einzelnen Blättern (5-16) für die Monate (August - Juli) von einem Datum in einen T...
                    

                    

                        

                                                            16.04.2015 11:40:20
                                                    

                        

                            Thread-ID:
                            1421170
                        

                        

                            2
                            Beiträge
                        

                    

                

                
                    

                   
                
        

                           
                

                    

                        

                            
                            Namen automatisch vergeben aufgrund Tabellennamen
                        

                                                    

                                Jason
                            

                                            

                    

                                                

Hallo Wissen!

In einem Tabellenblatt habe ich 12 Spalten (A:L). In der Spalte J steht jeweils der Name des Projektleiters. Mit folgendem Makro werden die Daten gefiltert und automatisch ein separates Tabellenblatt pro Projektleiter erstellt. Anschliessend habe ich die Wahl, ob ich jedes Tab...
                    

                    

                        

                                                            30.07.2015 08:20:09
                                                    

                        

                            Thread-ID:
                            1439303
                        

                        

                            3
                            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
                

            

        

        
                    

                

                    

                        
                        
                    

                

                

                    

                        
                            3
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            7
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            2
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            6
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            23
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            9
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            4
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            6
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            1
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            2
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            8
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            3
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            6
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            1
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            1
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            3
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            13
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            3
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            5
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            1
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            6
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            5
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            1
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            11
                        
                    


                

            

                                

                

                    

                        
                        
                    

                

                

                    

                        
                            7