Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
148to152
148to152
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

"Speichern unter..." mit Zellwert?

Forumthread: "Speichern unter..." mit Zellwert?

"Speichern unter..." mit Zellwert?
16.08.2002 11:25:51
Ralf-Eckhard Böhne-Wilke
Hallo zusammen.

Ich möchte (per Makro), dass beim Aufruf der Funktion "Speichern unter" als Dateiname ein Wert aus einer bestimmten Zelle eines Tabellenblattes übernommen wird. Erschwerend kommt hinzu, das manchmal 2 unterschiedliche Werte aus 2 Arbeitsblättern (jeweils in der gleichen Zelle stehend) dort erscheinen sollen (durch Leerschritt getrennt). Ich glaube zwar kaum, dass es unter Office 2000 eine solche Möglichkeit gibt, habe aber ein bisschen Hoffnung, hier einen "Crack" zu finden, der mir vielliecht helfen kann.

Gruss,
Ralf


Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: "Speichern unter..." mit Zellwert?
16.08.2002 11:31:17
Micha
hi,

wieso muss dass unter "speichern unter..." sein?
schreib dir ein eigenes makro, das genau das ausführt,
und dann erstell einfach einen button mit verweis auf dieses makro in der symbolleiste (rechtsklick in symbolleiste->anpassen->befehle->makros).

mfg

Re: "Speichern unter..." mit Zellwert?
16.08.2002 11:35:57
L.Vira
so kannst du dir den Namen zusammenbasteln. speichern unter sollte kein Problem sein:
Option Explicit
Sub Namen_basteln()
Dim DName As String
If Sheets("Tabelle1").[a1] = "" Then Exit Sub
If Sheets("Tabelle2").[a1] = "" Then
DName = Sheets("Tabelle1").[a1]
Else
DName = Sheets("Tabelle1").[a1] & " " & _
Sheets("Tabelle2").[a1]
End If
MsgBox DName
End Sub

Anzeige
Re: "Speichern unter..." mit Zellwert?
16.08.2002 11:39:56
Micha
hi,

geht mit folgendem makro. tabelle1, tabelle2, zelle ersetzen,
auch die bedingung (nach if in klammern) wann die zweite zelle dazugenommen wird, kann editiert werden.

mfg

Sub saving()
Dim fname As String

fname = Worksheets("tabelle1").Range("zelle").Text
If (Worksheets("tabelle2").Range("zelle").Text <> "") Then_
fname = fname & " " & Worksheets("tabelle2").Range_
("zelle").Text & ".xls"
ActiveWorkbook.Close True, fname
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Hintergrundfarbe in Zahl umwandeln
Timo

Hallo zusammen.
Gibt es über VBA eine Möglichkeit, die Hintergrundfarbe einer Zelle in eine Zahl umzuwandeln und das schneller als mit for- Schleifen?
Habe einen Bereich ("J16:AG39"), wo ich per Zellaktivierung mit der Maus Zellen oder auch Zellbereiche mit einer Hintergrundfarbe verseh...
07.08.2008 19:30:00
Thread-ID: 1000082
4 Beiträge
Anzeige
Frage - Spalten einfügen & Spalten untereinander z
André

Hallo zusammen!
Ich habe da als blutiger Anfänger in VBA zwei Fragen:
1.) Wie kann ich in meiner Tabelle in jeder zweiten Spalte 4 leere Spalten einfügen lassen?
2.) Dann möchte ich unter den Inhalt der ersten fünf Spalten (A-E) den Inhalt der zweiten 5 Spalten (F-J) usw. In der grö...
08.08.2008 16:00:00
Thread-ID: 1000340
3 Beiträge
Anzeige
Löschen von Zeilen unter 1 Bedingung
Zeilen

Hallo,
ich habe in einer Excel Liste Produkte geführt, die den aktuellen Lagerbestand anzeigen.
Dort werden auch die Produkte aufgeführt, deren Produkte einen Lagerbestand von 0 haben.
Der Lagerbestand wird in Spalte B aufgeführt, die Produkte stehen in Spalte A. Der Datenbereich b...
08.08.2008 20:15:00
Thread-ID: 1000407
5 Beiträge
Sudoku Kontexmenü-Rechts [evtl. Hajo]
Matthias

Hallo
(Level bitte nicht ganz so ernst nehmen)
Folgendes:
In Diese Arbeitsmappe
Option Explicit 'nach einer Idee von Hajo Ziplies 'https://www.herber.de/forum/ _ archiv/972to976/t972675.htm Private Sub Workbook_BeforeClose(Cancel As Boolean) KontextmenueZuruecksetzen End Sub P...
08.08.2008 21:58:35
Thread-ID: 1000418
10 Beiträge
Untergenze in VBA
Axel

Hallo alle miteinander,
ich nicht weiß einfach nicht wie ich die Untergrenze Funktion in mein UserForm einbinden kann.
Kurze Erklärung:
Ich habe ein UserForm mit einem Drehfeld zum durchblättern der Zeilen, in Spalte 27 ist ein Zahlenwert mit zwei Kommastellen eingetragen, das nach...
11.08.2008 10:10:47
Thread-ID: 1000733
7 Beiträge
Anzeige
3 Zellen zu 1ner 3-Zeiligen (wieAlt+Enter) machen
Horst_H

Hallo!
Meine Frage: In Spalte C steht eine Straßenbezeichnung, in Spalte H ein Kommentar und in Spalte I ein zweiter Kommentar. Nun möchte ich per VBA (weil ich viele Mappen unterschiedl. Länge und unterschiedlicher Stadtteile habe) erreichen, dass zusätzlich in die jeweilige Zelle in Spal...
11.08.2008 16:07:27
Thread-ID: 1000899
10 Beiträge
Nie zweimal gleiche Werte hintereinander (Teil 2)
Kay

Hallo,
Ich hoffe, es kann mir nochmal jemand weiterhelfen.
Am 05.08. um 16.30 Uhr habe ich bereits schon mal einen Thread zu diesem Thema eröffnet, jedoch noch keine abschließende Lösung gefunden.
Mit Hilfe von "Hary" habe ich folgendes Sheet gebaut, welches auch soweit funktioniert...
11.08.2008 16:12:24
Thread-ID: 1000900
8 Beiträge
Excel - Interpolierung / Intervall / trend
schulze

Halli Hallo,
ich habe folgendes kleine Problem:
Es geht darum, dass ich Jahresbentuzungsstunden ausreche. Diese können jede x-beliege Ganzzahl zwischen 100 und 8640 sein.
Diese Zahl wird nun anhand einer linearen Steigerung (100Std.-Intervalle) zugeordent. Z.B. habe ich dies Jahresb...
13.08.2008 10:24:57
Thread-ID: 1001412
10 Beiträge
Anzahl unterschiedl. Werte in Spalte zählen
Jakob

Hallo,
ein ähnliches Problem wurde hier im Forum schon einmal diskutiert. (https://www.herber.de/forum/archiv/632to636/t635773.htm)
Meine Problem:
Wie kann ich die Anzahl unterschiedlicher Einträge/Werte einer Spalte erhalten, ohne dass diese vorgegeben werden ( also ohne die Verwe...
14.08.2008 18:16:11
Thread-ID: 1001934
2 Beiträge
Button Internetlink
Corinna

Hi!
Hab nen weiteres Anliegen. Kann man einen Button der Userform mit dem Internet verlinken? Also ich meine, das wenn ich diesen Button anklicke, das sich ein bestimmter Internetlink (welchen ich vorher festgelegt habe) öffnet?
Danke für Eure Antworten.
Gruß Corinna
18.08.2008 13:47:31
Thread-ID: 1002574
5 Beiträge
Anzeige
Worksheet Change - Nur bei Änderung durch Userinte
Ina

Hallo Forum,
wie kann ich das Worksheet_Change-Ereignis so beschränken, dass es nur beim Eingriff über das User-Interface ausgelöst wird; Sheet-Änderungen über den Code sollen nicht zum Ereignis führen.
Kann mir jemand weiterhelfen?
Vielen Dank schonmal!
Gruß
Ina
19.08.2008 09:10:00
Thread-ID: 1002791
5 Beiträge
bedingte formatierung berechnen lassen unter vba
morbiuz

Hallo,
ich habe eine Spalte A auf der 2 verschiedene bedingte Formatierungen gesetzt sind (rot, grün) für die Scriftfarbe
leider kann ich die Werte nicht über meine Funktion zusammenrechnen lassen:
Sub mtest() Dim zelle As Range Dim bereich As Range Dim a As Integer Set bereich =...
20.08.2008 03:03:00
Thread-ID: 1003056
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige