Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Wird irgendein Wert eingeben, erfolgt Fehlermeldung
zurück: ExceMakro für den Import von Daten gesucht weiter: Excel 2003 Userform: Hilfetext zu Textfeld einblenden Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Seilram
Excel-Fan


Verfasst am:
01. Feb 2012, 11:56
Rufname:

Wird irgendein Wert eingeben, erfolgt Fehlermeldung - Wird irgendein Wert eingeben, erfolgt Fehlermeldung

Nach oben
       Version: Office 2007

Guten Tag zusammen

Ich möchte, dass der Benutzer z.B. in die Spalte C nichts schreiben kann und kann dies aus einem bestimmten Grund nicht mittels Blattschutz abfangen. Kann ich dies mit VBA lösen? evt. mit Worksheet_SelectionChange.

Herzlichen Dank für die Antwort.

Gruss Seilram
pefeu
Im Profil kannst Du frei den Rang ändern


Verfasst am:
01. Feb 2012, 12:04
Rufname: Peter
Wohnort: Hamburg


AW: Wird irgendein Wert eingeben, erfolgt Fehlermeldung - AW: Wird irgendein Wert eingeben, erfolgt Fehlermeldung

Nach oben
       Version: Office 2007

Hallo Seilram,

versuchen könntest Du das so:
Code:
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)

   If Target.Count > 1 Then Exit Sub
   If Target.Column = 2 Then Target.Value = ""

End Sub

Rechtsklick auf den Tabellenblattreiter
Linksklick auf Code anzeigen
Das Makro in das große sich öffnende Fenster kopieren
Mit Schließen-Kreuz oben rechts wieder verlassen
und testen.

Gruß Peter
Klaus-Dieter
Schwerpunktinteresse: VBA und UserForms


Verfasst am:
01. Feb 2012, 12:14
Rufname: Klaus
Wohnort: Sassenburg

AW: Wird irgendein Wert eingeben, erfolgt Fehlermeldung - AW: Wird irgendein Wert eingeben, erfolgt Fehlermeldung

Nach oben
       Version: Office 2007

Hallo,

versuche es einmal damit:

Microsoft Excel Objekt Tabelle1
Option Explicit 
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
If Target.Column = 3 Then 
    MsgBox "keine Eingabe möglich" 
    Cells(Target.Row, 4).Select 
End If 
End Sub 

Code eingefügt mit VBA in HTML 2.0.0.3

_________________
Viele Grüße
Klaus-Dieter
Lösungsvorschläge sind, wenn es keinen anders lautenden Hinweis gibt, von mir getestet.
Yoga ist besser, als rumsitzen und gar nichts machen.
Seilram
Excel-Fan


Verfasst am:
01. Feb 2012, 14:28
Rufname:


AW: Wird irgendein Wert eingeben, erfolgt Fehlermeldung - AW: Wird irgendein Wert eingeben, erfolgt Fehlermeldung

Nach oben
       Version: Office 2007

Herzlichen Dank für die Beiträge!

Ich habe den Beitrag von Klaus-Dieter benützt und bin super zufrieden. Herzlichen Dank.

Gruss Seilram
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Zählen von Zellen mit best. Wert bei eingeschaltetem Filter 3 Lothar55 2074 19. März 2005, 15:03
fl618 Zählen von Zellen mit best. Wert bei eingeschaltetem Filter
Keine neuen Beiträge Excel Formeln: Bestellnummern eingeben 2 Sylv 417 18. März 2005, 10:04
hypotemuse Bestellnummern eingeben
Keine neuen Beiträge Excel Formeln: Mathematischer Betrag. Wie eingeben? Formel? 2 Gast 4474 25. Feb 2005, 11:25
Gast Mathematischer Betrag. Wie eingeben? Formel?
Keine neuen Beiträge Excel Formeln: Bekomme Fehler #Wert nicht weg 9 Cerberus 1225 21. Feb 2005, 23:46
Cerberus Bekomme Fehler #Wert nicht weg
Keine neuen Beiträge Excel Formeln: vergleich mit Wert vor 10min 2 Norbert_B 585 11. Feb 2005, 15:19
Norbert_B vergleich mit Wert vor 10min
Keine neuen Beiträge Excel Formeln: Statischer Wert innerhalb einer WENN Formel 2 Viviane 2832 17. Jan 2005, 13:19
Viviane Statischer Wert innerhalb einer WENN Formel
Keine neuen Beiträge Excel Formeln: Wert automatisch durch Anzahl der Tage in einem Monat teilen 2 mucky99 2180 17. Dez 2004, 08:52
mucky99 Wert automatisch durch Anzahl der Tage in einem Monat teilen
Keine neuen Beiträge Excel Formeln: SVERWEIS, Wert aus der nächsten zelle 9 Dave 5483 11. Okt 2004, 13:50
Dave SVERWEIS, Wert aus der nächsten zelle
Keine neuen Beiträge Excel Formeln: #wert! Fehlermeldung 2 ababa 958 26. Sep 2004, 18:32
ababa #wert! Fehlermeldung
Keine neuen Beiträge Excel Formeln: Anzahl der Zeilen in Abhängigkeit von einem Wert 6 dani3l 1972 24. Sep 2004, 01:37
xyzdef Anzahl der Zeilen in Abhängigkeit von einem Wert
Keine neuen Beiträge Excel Formeln: Wie kann ich einen Wert aus einem Vergleich übernehmen? 1 lolarenntwieder 1725 22. Sep 2004, 00:25
fl618 Wie kann ich einen Wert aus einem Vergleich übernehmen?
Keine neuen Beiträge Excel Formeln: höchsten Wert a. e. Spalte und passenden Namen 6 Gast 1637 20. Sep 2004, 23:03
Fm höchsten Wert a. e. Spalte und passenden Namen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML CSS