Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Nur eine Zelle aktivieren erlaubt

Frage Microsoft Microsoft Office

Mitglied: xaumichi

xaumichi (Level 1) - Jetzt verbinden

24.08.2010 um 12:28 Uhr, 2531 Aufrufe, 3 Kommentare

Hallo!

Ist es möglich, mit VBA einen Code zu schreiben, dass verhindert wird, dass in einem Worksheet mehr als eine Zelle aktiviert/selektiert wird?

Hintergrund: is gibt im vorhanden Code einige Passagen, mit "...Target.Row...." usw. und diese funktionierten natürlich nicht mehr, wenn nun zB 2 Zellen markiert werden und dann der Inhalt davon gelöscht wird.

Lg Mike
Mitglied: atbs84
24.08.2010 um 12:47 Uhr
Moin,
frag doch im Code vor diesen Passagen ab wieviele Zellen markiert sind und führe die entsprechende Aktion dann bei mehreren Zellen einfach nicht aus..., bzw. mach diese Abfrage vor dem Funktionsaufruf (also z.B. wenn der Benutzer dann den Button benutzt, der deine Aktionen da auslöst)
Bitte warten ..
Mitglied: 76109
24.08.2010 um 13:04 Uhr
Hallo Mike!

Das läßt sich doch ganz einfach per 'Target.Count > 1' überprüfen.

Beispiel:
01.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
02.
    If Target.Count > 1 Then MsgBox "Es wurden mehr als eine Zelle ausgewählt!" 
03.
End Sub
Du könntest auch etwas in der Art machen:
01.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
02.
    If Target.Count > 1 Then Cells(Target.Row, Target.Column).Select 
03.
End Sub
Wobei die Selektierung mehrerer Zellen aufgehoben wird, und nur die erste Zelle selektiert wird.

Gruß Dieter
Bitte warten ..
Mitglied: xaumichi
24.08.2010 um 13:56 Uhr
@atbs84: Danke für die Gedankenstütze!

@ didi1954:
Hui....das ist aber ne coole sache!
Genau so hab ich mir das vorgestellt
Danke schön!
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Powershell in Windows 10 erlaubt? (9)

Frage von Marabunta zum Thema Batch & Shell ...

VB for Applications
Import Textdatei von Dateiname aus Zelle (2)

Frage von grasihuepfer zum Thema VB for Applications ...

Windows Server
Druck wird nicht erlaubt (11)

Frage von daquick zum Thema Windows Server ...

Neue Wissensbeiträge
Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(2)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Windows 10

Windows 10: Erste Anmeldung Animation deaktivieren

(3)

Anleitung von alemanne21 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Netzwerkprotokolle
gelöst Leiten "dumme" Switches VLAN-Tags mit durch? (26)

Frage von coltseavers zum Thema Netzwerkprotokolle ...

Netzwerkgrundlagen
Kann auf Freigabe nicht Zugreifen (16)

Frage von leon123 zum Thema Netzwerkgrundlagen ...

Windows Server
gelöst Neues KB für W10 1607 und W2K16 wieder mal nicht im WSUS 3.0, hat das noch jemand? (16)

Frage von departure69 zum Thema Windows Server ...

Exchange Server
Apple Mail mit Exchange 2010 verbinden (12)

Frage von DieAzubinne zum Thema Exchange Server ...