Projektanfrage

Projektanfrage über Web Formular   per Online-Formular 
Projektanfrage über E-Mail  Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein!
Projektanfrage per Telefon  +49 (0)151 / 164 55 914
Projektanfrage weitere Informationen  weitere Informationen 

Sie benötigen Hilfe oder Unter-stützung? Nutzen Sie für Ihre Anfrage unser Online-Formular, senden Sie uns eine Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! oder rufen Sie uns einfach an.

   
      Referenzen 

 Bosch 
  T-Systems
  Hagebau
  Siemens
 Areva  VW
 Haufe-Lexware  British American Tobacco
  nagel group farbe
   
     Programmierung
Excel Auftragsprogrammierung Access Auftragsprogrammierung
Word Auftragsprogrammierung Outlook Auftragsprogrammierung
   

Projektanfrage

 Sie benötigen eine Auftragsprogrammierung?
 Oder suchen Unterstützung bei der Lösungs-
 findung?

  Nutzen Sie unser Anfrageformular

  Jetzt anrufen unter 0151 / 164 55 914

 Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! Projektanfrage per Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! senden

  Weitere Informationen

sitepanel question2

P
R
O
J
E
K
T
A
N
F
R
A
G
E
   

Zelle A1 um den Wert erhöhen, der in Zelle A1 eingegeben wird

104009



Mit folgendem Event-Makro wird die Zelle A1 um den in Zelle A1 eingegebenen Werte erhöht. Wenn in A1 eine 5 eingegeben wird, steht in A1 eine 5. Wird in A1 anschließend die Zahl 3 eingegeben, dann steht in A1 eine 8. Auf diese Weise lassen sich Werte in einer einzigen Zelle aufsummieren.

Option Explicit
Dim zahl As Double

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then
        Application.EnableEvents = False
        Target.Value = Target.Value + zahl
        Application.EnableEvents = True
    End If
End Sub

 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$A$1" Then zahl = Target.Value
End Sub

 


Bitte fügen Sie dieses Makro in das Code-Modul des Tabellenblatts ein, in dem er verwendet werden soll, da es sich um ein Worksheet-Event handelt.

   

Relevante Artikel

  • Ereignis beim selektieren einer Zelle ausführen

    Immer wenn in Excel eine Zelle aktiviert wird, wir das entsprechende Ereignis Worksheet_SelectionChange ausgeführt. In diesem Makro zeigen wir Ihnen, wie dies funktioniert. So soll bei Auswahl der...

  • Aktive Zelle mit Farbe hinterlegen

    104007 Folgendes Programm färbt die aktive Zelle farblich ein. Wird die Zelle wieder verlassen wird der Ursprungszustand in der verlassenen Zelle wieder hergestellt und die nun aktive Zelle...

  • Ausführen eines Makros nach einer definierten Wartezeit

    Möchten Sie ein Makro nach einer bestimmten Intervall-Zeit immer wieder ausführen? Möchten Sie bspw. alle 30 Minuten erinnert werden, Ihre Rückenübungen zu machen. Oder soll stündlich ein...

  • Makro per Doppelklick in eine Zelle starten

      Dieses Makro führt nach einem Doppelklich in die Zelle A1 ein beliebiges Makro aus.Um dies zu realisieren, wird das Worksheet Event "Worksheet_BeforeDoubleClick" verwendet. Der folgende Code muss dazu in das Codemodul eines...

  • Makro über die Funktion WENN() starten

    Haben Sie schon mal darüber nachgedacht, über die Funktion =WENN(Prüfung;dann;sonst)ein eigenes Makro auszuführen, wenn die Wenn-Bedingung eintritt? Nachfolgend zeigen wir Ihnen, wie sich dies...

   
Cookies erleichtern die Bereitstellung unserer Dienste. Mit der Bestätigung erklären Sie sich mit der Verwendung von Cookies auf Excel-Inside Solutions einverstanden.
Weitere Informationen Ok