Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1012to1016
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
1012to1016
1012to1016
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kommenare beim Klick in die leere Zelle anzeigen?

Kommenare beim Klick in die leere Zelle anzeigen?
11.10.2008 12:17:00
Selma
Hallo Leute,
ich möchte in Zellen der Spalte E und Spalte F die Kommmentare als errechnete Werte beim Klick in die Zelle anzeigen, wenn diese Zelle leer sind. Sind die Zelle gefüllt, dann soll der Kommentar nicht angezeigt werden.
Die Voraussetzung ist, dass in Zelle der Spalte D die Zahlen stehen (keine Buchstaben).
1. Steht in Zelle der Spalte D der Zahl und die Zelle der Spalte E und F beide leer sind,
dann soll beim Klick in die Zelle der Spalte E oder F als Kommentar das Ergebnis folgende Formel angezeigt werden:
In Zelle D2 steht als Beispiel: 6000
Berechnungsbeispiel für Zeile 2:
E2 für erste erste Zeile des Kommentars
=WURZEL(D2/(4*3600))*1000 ergibt als Ergebnis 645
E2 für zweite Zeile des Kommentars
=WURZEL(D2/(5*3600))*1000 ergibt als Ergebnis 577
E2 für dritte erste Zeile des Kommentars
=WURZEL(D2/(6*3600))*1000 ergibt als Ergebnis 527
Kommentar:
erste Zeile des Kommentars: a und b = 645 mm bei w = 4 m/s
zweite Zeile des Kommentars: a und b = 577 mm bei w = 5 m/s
dritte Zeile des Kommentars: a und b = 527 mm bei w = 6 m/s
Screenshot:
2. Steht in Zelle der Spalte D der Zahl und die Zelle der Spalte F leer ist,
dann soll beim Klick in die Zelle der Spalte F als Kommentar das Ergebnis folgende Formel angezeigt werden:
In Zelle D2 steht als Beispiel: 6000
In Zelle E2 steht als Beispiel: 580
Berechnungsbeispiel für Zeile 2:
F2 für erste erste Zeile des Kommentars
=D2/(4*3600*E2)*1000000 ergibt als Ergebnis 718
F2 für zweite Zeile des Kommentars
=D2/(5*3600*E2)*1000000 ergibt als Ergebnis 575
F2 für dritte erste Zeile des Kommentars
=D2/(6*3600*E2)*1000000 ergibt als Ergebnis 479
Kommentar:
erste Zeile des Kommentars: b = 718 mm bei w = 4 m/s
zweite Zeile des Kommentars: b = 575 mm bei w = 5 m/s
dritte Zeile des Kommentars: b = 479 mm bei w = 6 m/s
Screenshot:
3. Steht in Zelle der Spalte D der Zahl und die Zelle der Spalte E leer ist,
dann soll beim Klick in die Zelle der Spalte E als Kommentar das Ergebnis folgende Formel angezeigt werden:
In Zelle D2 steht als Beispiel: 6000
In Zelle F2 steht als Beispiel: 650
Berechnungsbeispiel für Zeile 2:
E2 für erste erste Zeile des Kommentars
=D2/(4*3600*F2)*1000000 ergibt als Ergebnis 641
E2 für zweite Zeile des Kommentars
=D2/(5*3600*F2)*1000000 ergibt als Ergebnis 513
E2 für dritte erste Zeile des Kommentars
=D2/(6*3600*F2)*1000000 ergibt als Ergebnis 427
Kommentar:
erste Zeile des Kommentars: a = 641 mm bei w = 4 m/s
zweite Zeile des Kommentars: a = 513 mm bei w = 5 m/s
dritte Zeile des Kommentars: a = 427 mm bei w = 6 m/s
Screenshot:
Wie mache ich das?
Vielen Dank im Voraus !
Liebe Grüße,
Selma

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kommenare beim Klick in die leere Zelle anzeigen?
11.10.2008 17:01:00
Tino
Hallo,
teste mal diesen Code.
Kommt als Code ins entsprechende Tabellenblatt.
Habe den Code nicht ausreichend getestet sollte aber funktionieren.
Bin mir auch nicht sicher, ob es die Sqr (Wurzel) Funktion in xl2000 gibt.
Bin jetzt außer Haus und kann erst heute Abend wieder online.
Microsoft Excel Objekt Tabelle1 
Option Explicit 
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
Dim Wert1 As Long, Wert2 As Long, Wert3 As Long 
 
With Target 
If .Count > 1 Then Exit Sub 
 
If .Column = 5 Then 
 If Cells(.Row, "E") = "" And Cells(.Row, "F") = "" Then 
   Wert1 = Sqr(Cells(.Row, "D") / (4 * 3600)) * 1000 
   Wert2 = Sqr(Cells(.Row, "D") / (5 * 3600)) * 1000 
   Wert3 = Sqr(Cells(.Row, "D") / (6 * 3600)) * 1000 
  .ClearComments 
  .AddComment strText(Wert1, Wert2, Wert3, 2) 
  .Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
  .Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
 End If 
ElseIf .Column = 6 And Target <> "" Then 
 Wert1 = Cells(.Row, "D") / (4 * 3600 * Cells(.Row, "E")) * 1000000 
 Wert2 = Cells(.Row, "D") / (5 * 3600 * Cells(.Row, "E")) * 1000000 
 Wert3 = Cells(.Row, "D") / (6 * 3600 * Cells(.Row, "E")) * 1000000 
 .ClearComments 
 .AddComment strText(Wert1, Wert2, Wert3, 0) 
 .Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
 .Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
ElseIf .Column = 7 And Target <> "" Then 
 Wert1 = Cells(.Row, "D") / (4 * 3600 * Cells(.Row, "F")) * 1000000 
 Wert2 = Cells(.Row, "D") / (5 * 3600 * Cells(.Row, "F")) * 1000000 
 Wert3 = Cells(.Row, "D") / (6 * 3600 * Cells(.Row, "F")) * 1000000 
 .ClearComments 
 .AddComment strText(Wert1, Wert2, Wert3, 1) 
 .ShapeRange.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
 .ShapeRange.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
End If 
End With 
End Sub 
 
Function strText(Wert1 As Long, Wert2 As Long, Wert3 As Long, byCol As Byte) As String 
Dim strErsatz As String 
strErsatz = IIf(byCol = 0, "b = ", IIf(byCol = 2, "a = ", "a und b = ")) 
strText = strErsatz & Wert1 & " mm bei w = 4 m/s" & Chr(10) 
strText = strText & strErsatz & Wert2 & " mm bei w = 5 m/s" & Chr(10) 
strText = strText & strErsatz & Wert3 & " mm bei w = 6 m/s" 
 
End Function


Gruß Tino

www.VBA-Excel.de


Anzeige
AW: Kommenare beim Klick in die leere Zelle anzeigen?
11.10.2008 19:12:31
Selma
Hallo Tino,
ich habe mit folgenden Ergebnissen getestet:
- Die Kommentare sollen nur dann angezeigt werden, wenn die Zelle leer ist mit Voraussetztung das in Zelle der Spalte D der Zahl steht. Beim Buchstaben sollen die Kommentare nicht angezeigt werden.
Sind die Zelle in Spalte E und F mit Inhalten gefüllt, dann sollen die Komentare gelöscht werden.
- zu Punkt 1: es soll im Kommentar wie folgt heißen a und b = ..... (wenn E und F leer sind)
- zu Punkt 1: beim Klick in Zelle F wird der Kommentar nicht angezeigt, sondern in Zelle E eine Zeile drunter
Könntest du bitte die obige Punkte noch korrigieren, dann kann ich es noch einmal durchtesten ?
Besten Dank !
LG,
Selma
Anzeige
AW: Kommenare beim Klick in die leere Zelle anzeigen?
11.10.2008 20:33:00
Tino
Hallo,
ok. noch ein Versuch, beachten den Code der in ein Modul muss.
Microsoft Excel Objekt Tabelle1 
Option Explicit 
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
Dim Wert1 As Long, Wert2 As Long, Wert3 As Long 
 
If Not MerkTarget Is Nothing Then MerkTarget.ClearComments 
 
With Target 
    If .Count > 1 Then Exit Sub 
    If .Value <> "" Then Exit Sub 
 
If .Column = 5 Then 
 If Cells(.Row, "E") = "" And Cells(.Row, "D") <> "" Then 
   Wert1 = Sqr(Cells(.Row, "D") / (4 * 3600)) * 1000 
   Wert2 = Sqr(Cells(.Row, "D") / (5 * 3600)) * 1000 
   Wert3 = Sqr(Cells(.Row, "D") / (6 * 3600)) * 1000 
  .ClearComments 
  .AddComment strText(Wert1, Wert2, Wert3, 2) 
  .Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
  .Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
  Set MerkTarget = Target 
 End If 
ElseIf .Column = 6 And Target = "" Then 
If Cells(.Row, "D") <> "" And Cells(.Row, "E") <> "" Then 
 Wert1 = Cells(.Row, "D") / (4 * 3600 * Cells(.Row, "E")) * 1000000 
 Wert2 = Cells(.Row, "D") / (5 * 3600 * Cells(.Row, "E")) * 1000000 
 Wert3 = Cells(.Row, "D") / (6 * 3600 * Cells(.Row, "E")) * 1000000 
 .ClearComments 
 .AddComment strText(Wert1, Wert2, Wert3, 0) 
 .Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
 .Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
Set MerkTarget = Target 
 End If 
ElseIf .Column = 7 And Target = "" Then 
If Cells(.Row, "D") <> "" And Cells(.Row, "E") <> "" Then 
 Wert1 = Cells(.Row, "D") / (4 * 3600 * Cells(.Row, "F")) * 1000000 
 Wert2 = Cells(.Row, "D") / (5 * 3600 * Cells(.Row, "F")) * 1000000 
 Wert3 = Cells(.Row, "D") / (6 * 3600 * Cells(.Row, "F")) * 1000000 
 .ClearComments 
 .AddComment strText(Wert1, Wert2, Wert3, 1) 
 .ShapeRange.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
 .ShapeRange.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
 Set MerkTarget = Target 
End If 
End If 
End With 
 
End Sub 
 
Function strText(Wert1 As Long, Wert2 As Long, Wert3 As Long, byCol As Byte) As String 
Dim strErsatz As String 
strErsatz = IIf(byCol = 0, "b = ", IIf(byCol = 1, "a = ", "a und b = ")) 
strText = strErsatz & Wert1 & " mm bei w = 4 m/s" & Chr(10) 
strText = strText & strErsatz & Wert2 & " mm bei w = 5 m/s" & Chr(10) 
strText = strText & strErsatz & Wert3 & " mm bei w = 6 m/s" 
 
End Function

Modul Modul1 

Option Explicit 
 
Public MerkTarget As Range


Gruß Tino

Anzeige
AW: Kommenare beim Klick in die leere Zelle anzeigen?
11.10.2008 22:25:00
Selma
Hallo Tino,
fast alles richtig ;)
- wenn in Zelle der Spalte D der Wert drin steht, und die Zellen der Spalte E und F beide leer sind,
dann soll gleiche Kommentar wie in Spalte E auch in Spalte F angezeigt werden.
Beispiel:
D2 = 6000
E2 = nichts
F2 = nichts
Beide Kommenare sind dann gleich sprich a und b = .....
- wenn in Zelle der Spalte D und Spalte F die Werte drin stehen, und die Zelle der Spalte E leer ist,
dann soll der Kommentar in Zelle der Spalte E als a = ..... angezeigt werden.
Erläuterung der Kommentare:
Kommentar in Spalte E fängt mit a = .... an, wenn der Wert in Zelle der Spalte F fehlt
Kommentar in Spalte F fängt mit b = .... an, wenn der Wert in Zelle der Spalte E fehlt
Kommentar in Spalte E und F fängt mit a und b = .... an, wenn die Werte in Zelle der Spalte E und F fehlen.
Könntest du bitte die obige Punkte noch korrigieren?
Besten Dank !!!
LG,
Selma
Anzeige
AW: Kommenare beim Klick in die leere Zelle anzeigen?
11.10.2008 23:27:00
Tino
Hallo,
das mit den beiden Kommentaren in zwei Zellen habe ich noch nicht eingebaut.
Schaue jetzt Boxen.
Microsoft Excel Objekt Tabelle1 
Option Explicit 
  
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
Dim Wert1 As Long, Wert2 As Long, Wert3 As Long 
  
If Not MerkTarget Is Nothing Then MerkTarget.ClearComments 
  
With Target 
    If .Count > 1 Then Exit Sub 
    If .Value <> "" Then Exit Sub 
  
If .Column = 5 And (Cells(.Row, "E") = "" And Cells(.Row, "D") <> "" And Cells(.Row, "F") = "") Then 
 
   Wert1 = Sqr(Cells(.Row, "D") / (4 * 3600)) * 1000 
   Wert2 = Sqr(Cells(.Row, "D") / (5 * 3600)) * 1000 
   Wert3 = Sqr(Cells(.Row, "D") / (6 * 3600)) * 1000 
  .ClearComments 
  .AddComment strText(Wert1, Wert2, Wert3, 2) 
  .Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
  .Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
  Set MerkTarget = Target 
 
 
ElseIf .Column = 6 And Target = "" Then 
If Cells(.Row, "D") <> "" And Cells(.Row, "E") <> "" Then 
 Wert1 = Cells(.Row, "D") / (4 * 3600 * Cells(.Row, "E")) * 1000000 
 Wert2 = Cells(.Row, "D") / (5 * 3600 * Cells(.Row, "E")) * 1000000 
 Wert3 = Cells(.Row, "D") / (6 * 3600 * Cells(.Row, "E")) * 1000000 
 .ClearComments 
 .AddComment strText(Wert1, Wert2, Wert3, 0) 
 .Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
 .Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
Set MerkTarget = Target 
 End If 
 
ElseIf .Column = 5 And (Cells(.Row, "F") <> "" And Cells(.Row, "D") <> "") Then 
If Cells(.Row, "D") <> "" And Cells(.Row, "F") <> "" Then 
 Wert1 = Cells(.Row, "D") / (4 * 3600 * Cells(.Row, "F")) * 1000000 
 Wert2 = Cells(.Row, "D") / (5 * 3600 * Cells(.Row, "F")) * 1000000 
 Wert3 = Cells(.Row, "D") / (6 * 3600 * Cells(.Row, "F")) * 1000000 
 .ClearComments 
 .AddComment strText(Wert1, Wert2, Wert3, 1) 
 .Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
 .Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
 Set MerkTarget = Target 
End If 
 
End If 
 
End With 
  
End Sub 
  
Function strText(Wert1 As Long, Wert2 As Long, Wert3 As Long, byCol As Byte) As String 
Dim strErsatz As String 
strErsatz = IIf(byCol = 0, "b = ", IIf(byCol = 1, "a = ", "a und b = ")) 
strText = strErsatz & Wert1 & " mm bei w = 4 m/s" & Chr(10) 
strText = strText & strErsatz & Wert2 & " mm bei w = 5 m/s" & Chr(10) 
strText = strText & strErsatz & Wert3 & " mm bei w = 6 m/s" 
  
End Function

Modul Modul1 

Option Explicit 
 
Public MerkTarget As Range


Gruß Tino

Anzeige
jetzt gehts
12.10.2008 00:27:00
Tino
Hallo,
Boxen ist vorbei und jetzt hab ich alles.
Microsoft Excel Objekt Tabelle1 
Option Explicit 
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
Dim Wert1 As Long, Wert2 As Long, Wert3 As Long 
 
 
If Not MerkTarget Is Nothing Then MerkTarget.ClearComments 
 
With Target 
    If .Count > 1 Then Exit Sub 
    If .Value <> "" Or Cells(.Row, "D") = "" Then Exit Sub 
 
If (.Column = 5 Or .Column = 6) And Cells(.Row, "E") = "" And Cells(.Row, "F") = "" Then 
 
   Wert1 = Sqr(Cells(.Row, "D") / (4 * 3600)) * 1000 
   Wert2 = Sqr(Cells(.Row, "D") / (5 * 3600)) * 1000 
   Wert3 = Sqr(Cells(.Row, "D") / (6 * 3600)) * 1000 
   Set MerkTarget = Range(Cells(.Row, "E"), Cells(.Row, "F")) 
  MerkTarget.ClearComments 
  MerkTarget(1).AddComment strText(Wert1, Wert2, Wert3, 2) 
  MerkTarget(1).Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
  MerkTarget(1).Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
  MerkTarget(2).AddComment strText(Wert1, Wert2, Wert3, 2) 
  MerkTarget(2).Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
  MerkTarget(2).Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
 
 
ElseIf .Column = 5 And (Cells(.Row, "E") = "" And Cells(.Row, "F") <> "") Then 
 
 Wert1 = Cells(.Row, "D") / (4 * 3600 * Cells(.Row, "F")) * 1000000 
 Wert2 = Cells(.Row, "D") / (5 * 3600 * Cells(.Row, "F")) * 1000000 
 Wert3 = Cells(.Row, "D") / (6 * 3600 * Cells(.Row, "F")) * 1000000 
 .ClearComments 
 .AddComment strText(Wert1, Wert2, Wert3, 1) 
 .Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
 .Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
 
 Set MerkTarget = Target 
 
 
 
ElseIf .Column = 6 And Cells(.Row, "E") <> "" And Cells(.Row, "F") = "" Then 
 
If Cells(.Row, "D") <> "" And Cells(.Row, "E") <> "" Then 
 Wert1 = Cells(.Row, "D") / (4 * 3600 * Cells(.Row, "E")) * 1000000 
 Wert2 = Cells(.Row, "D") / (5 * 3600 * Cells(.Row, "E")) * 1000000 
 Wert3 = Cells(.Row, "D") / (6 * 3600 * Cells(.Row, "E")) * 1000000 
 .ClearComments 
 .AddComment strText(Wert1, Wert2, Wert3, 0) 
 .Comment.Shape.ScaleWidth 1.42, msoFalse, msoScaleFromTopLeft 
 .Comment.Shape.ScaleHeight 0.63, msoFalse, msoScaleFromTopLeft 
Set MerkTarget = Target 
 End If 
 
 
End If 
 
 
 
End With 
 
End Sub 
 
Function strText(Wert1 As Long, Wert2 As Long, Wert3 As Long, byCol As Byte) As String 
Dim strErsatz As String 
strErsatz = IIf(byCol = 0, "b = ", IIf(byCol = 1, "a = ", "a und b = ")) 
strText = strErsatz & Wert1 & " mm bei w = 4 m/s" & Chr(10) 
strText = strText & strErsatz & Wert2 & " mm bei w = 5 m/s" & Chr(10) 
strText = strText & strErsatz & Wert3 & " mm bei w = 6 m/s" 
 
End Function

Modul Modul1 

Option Explicit 
 
Public MerkTarget As Range


Gruß Tino

Anzeige
AW: jetzt gehts
12.10.2008 10:51:24
Selma
Vielen Dank Tino !
LG,
Selma

349 Forumthreads zu ähnlichen Themen

Inhalt einer Zelle im Windows Infobereich anzeigen
Thomas

Hallo,
kann ich den Inhalt einer Zelle im Windows Infobereich anzeigen lassen?
Ich habe eine VBA-Anwendung, die mir den Verarbeitungsstatus in einer Zelle anzeigt.
Weil die Verarbeitung sehr lange dauert möchte ich zwischendurch mit anderen Anwendungen arbeiten und unten rechts nebe...
27.08.2008 17:50:23
Thread-ID: 1005163
3 Beiträge
Anzeige
Syntax für benutzerdefiniertes Zellenformat
BF

Hallo Forum,
kennt jemand eine kurze Beschreibung im Internet zur Syntax des benutzerdefinierten Zellenformats (Zellen formatieren - Zahlen - Benutzerdefiniert - Typ)?
Ich möchte jetzt z.B. statt einer Null einen Strich anzeigen...
Eine allgemeine Anleitung wäre klasse, da ich schon...
04.10.2008 16:17:00
Thread-ID: 1014157
3 Beiträge
Fehler bei Formel per Makro in Zelle eintragen
Born

Hallo Forum,
ich habe folgendes Problem:
Ich schreibe per Makro in Zellen eine Formel. Als Ergebnis bekomme ich jedoch nur die Fehlermeldung #NAME?. Wenn ich dann mit F2 in den Bearbeiten-Modus gehe und Enter drücke, kommt das richtige Ergebnis. Meine Formel scheint also richtig zu sein...
23.10.2008 10:15:00
Thread-ID: 1018538
11 Beiträge
Anzeige
Benutzername Datum Zeit in Zelle
Michael

Hallo zusammen,
ich suche nach einem Makro, das einen Benutzernamen aus Tabelle1 Zelle B2, das aktuelle Datum (JJJJ.MM.TT) und die Zeit der Änderung Zeit (hh:mm:ss) bei Änderungen in einer Zeile der Spalten A bis AT in die Zelle AU2 usw. schreibt.
Die Suche hat mich leider nicht weiterg...
27.12.2008 19:52:00
Thread-ID: 1035469
15 Beiträge
Pfad der letzten Speicherung
Iro

Hallo Excel-Gemeinde,
ist es möglich den Ordner herauszufinden, in dem zuletzt von Excel etwas gespeichert wird?
Hintergrund ist, dass in genau diesem Ordner gespeichert wird, wenn ich mit dem Befehl
Spreadsheet.Export Filename:="Filename.xls", Action:=ssExportActionNone
ein...
07.01.2009 18:00:59
Thread-ID: 1037642
3 Beiträge
Benutzername Datum Zeit in Zelle
Micha

Hallo zusammen,
am 29.12.2008 hat mir Peter Feustel bei einem Problem geholfen. Klappte auch alles wunderbar.
Archiv: https://www.herber.de/forum/archiv/1032to1036/t1035469.htm
(vom Archiv aus kann man Beiträge wohl nicht mehr als "Beitrag offen" setzen?!)
Nun macht das Makro "S...
25.01.2009 19:19:50
Thread-ID: 1043657
9 Beiträge
VBA - Berechnung ohne Formeleintrag
kasi

Hallo liebe Excelprofis,
im Grunde bin ich jemand der lieber allein etwas herausfindet als jemanden um Hilfe zu bitten, aber ich weiß jetzt einfach nicht weiter :-(
Nach 6 Tagen rumforschen in allen möglichen Foren geb ich mich geschlagen und will nun doch hier fragend mein Glück versuc...
18.02.2009 02:59:00
Thread-ID: 1051668
4 Beiträge
knifflig: in einer Zelle anzeigen, ob Makros aktiv
Tobias

Gibts ne Möglichkeit, in einer Zelle den "makrostatus" abzufragen.
Ohne VBA natürlich :)
So eine WAHR/FALSCH ausgabe wär praktisch,
da ich den Anfängern, die die Mappe öffnen, einen deutlichen Hinweis darauf geben möchte,
das sie Ohne aktiviertem VBA nicht funktioniert...
I...
20.02.2009 16:47:00
Thread-ID: 1052499
6 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
2
2
10
7
14
2
8
3
5
6
4
4
8
5
10
2
3
11
2
1
2
5
8
1