Top-Themen

Aktuelle Themen (A bis Z)

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

Virtual Basic Wert in eine Zelle eintragen

Frage Entwicklung VB for Applications

Mitglied: Termiman

Termiman (Level 1) - Jetzt verbinden

31.05.2014, aktualisiert 00:29 Uhr, 1842 Aufrufe, 2 Kommentare

Hallo liebe Leute,

ich stehe vor einer kleinen Hürde bei VB für Excel.

Und zwar möchte ich gerne in Excel einen Wert in eine Zelle schreiben lassen. Der Hintergrunde ist der:

d8f6b23f0268c374afe2e87d77964e88 - Klicke auf das Bild, um es zu vergrößern

Ich habe eine Tabelle in der mittlerweile mehrere hundert Produkte eingetragen sind. Jedem Produkt ist ein fester Preis zugeordnet, welcher mit einem SVerweis im Tabellenblatt ausgegeben wird.

Jedoch kommen im Monat ständig Preisänderungen hinzu in der ich mühselig in den Zeilen scrollen muss, um die Anpassungen vornehmen zu können.

Meine Idee wäre, im oberen Bereich eine Auswahlzelle "D3" wo ich mir das Produkt ausgeben lasse und im Feld "F3" den neuen Preis eingebe. Nach Eingabe des Preises soll mit dem Button die Änderung in diesem Fall (siehe Bild) "B6" geändert werden.

Über einen oder mehrere kleine Tipps bin ich euch sehr dankbar.


liebe Grüsse

Termiman
Mitglied: rubberman
31.05.2014 um 01:37 Uhr
Hallo Termiman,

so etwa sollte das funktionieren
01.
Sub ChangePrice() 
02.
    Dim rgFound As Excel.Range 
03.
     
04.
    Set rgFound = ActiveSheet.Range("A2:A" & Range("A1").End(xlDown).Row).Find(ActiveSheet.Range("D3"), , , xlWhole, , , True) 
05.
    If rgFound Is Nothing Then 
06.
        MsgBox "Nicht gefunden.", vbCritical, "Fehler" 
07.
    Else 
08.
        rgFound.Offset(0, 1) = ActiveSheet.Range("F3") 
09.
    End If 
10.
End Sub
Grüße
rubberman
Bitte warten ..
Mitglied: Termiman
31.05.2014 um 07:36 Uhr
Hey rubberman,

vielen lieben Dank für die schnelle Antwort, vor allem zur so späten Stunde noch. Das Skript funktioniert einwandfrei, genau so hatte ich mir das gedacht.

cool



danke danke


liebe Grüsse

Termiman
Bitte warten ..
Ähnliche Inhalte
VB for Applications
Visual Basic Wert in Tabelle eintragen und erweitern
gelöst Frage von TermimanVB for Applications4 Kommentare

Hallo liebe Leute, ich bekam damals schon einen sehr guten Tipp für meine kleine Excel Tabelle. Nun würde ich ...

VB for Applications
Visual Basic - Werte in ausgeblendete Zeilen eintragen
gelöst Frage von TermimanVB for Applications2 Kommentare

Guten Abend liebe Leute, ich habe vor einiger Zeit eine super Hilfestellung bei meiner kleinen Excel Liste bekommen. siehe ...

Microsoft Office
Wenn eine zelle einen bestimmten wert aus anderen zellen annimmt...
gelöst Frage von BerndVorwerkMicrosoft Office4 Kommentare

Hallo an alle, ich wende mich einmal mehr vertrauensvoll an euch: Wie muss die Funktion in Excel aussehen, wenn ...

Microsoft Office
Automatisches eintragen in zweite Zelle
gelöst Frage von Fisi93Microsoft Office2 Kommentare

Hallo, ich habe gerade ein kleines Problemchen festgestellt. Wir haben letztes Jahr eine aproche Anwendung abgelöst und daraus eine ...

Neue Wissensbeiträge
Linux

Limux-Ende in München: Wie ein Linux Projekt unter Ausschluss der Öffentlichkeit zerstört wurde

Information von Frank vor 7 StundenLinux12 Kommentare

Mein persönlicher Kommentar zum Thema "Limux-Ende". Die SPD-Politikerin Anne Hübner hat die Richtung von München ganz klar definiert: "Wir ...

Batch & Shell

Open Object Rexx: Eine mittlerweile fast vergessene Skriptsprache aus dem Mainframebereich

Information von Penny.Cilin vor 1 TagBatch & Shell9 Kommentare

Ich kann mich noch sehr gut an diese Skriptsprache erinnern und nutze diese auch heute ab und an noch. ...

Humor (lol)

"gimme gimme gimme": Automatischer Test stolpert über Easter Egg im man-Tool

Information von Penny.Cilin vor 1 TagHumor (lol)6 Kommentare

Interessant, was man so alles als Easter Egg implementiert. Ist schon wieder Ostern? "gimme gimme gimme": Automatischer Test stolpert ...

MikroTik RouterOS

Mikrotik - Lets Encrypt Zertifikate mit MetaROUTER Instanz auf dem Router erzeugen

Anleitung von colinardo vor 2 TagenMikroTik RouterOS8 Kommentare

Einleitung Folgende Anleitung ist aus der Lage heraus entstanden das ein Kunde auf seinem Mikrotik sein Hotspot Captive Portal ...

Heiß diskutierte Inhalte
Router & Routing
Zwei Netzwerke erstellen
Frage von bunteblumeRouter & Routing14 Kommentare

Hallo Zusammen, Ich möchte gerne ein backup von einem bestimmten Folder welcher auf dem Server regelmässig synchronisiert wird auf ...

Windows 10
Alle Programme mit bestimmtem Namen automatisch (per GPO) deinstallieren
gelöst Frage von lordofremixesWindows 1012 Kommentare

Hallo zusammen, gibt es eine Möglichkeit, alle Programme beginnend mit z.B. "Dell" im Namen per Script und somit per ...

Off Topic
Fachkräftemangel in Deutschland? - Talentschmiede schreibt alle 2 Tage die gleichen Stellen aus
Frage von Penny.CilinOff Topic12 Kommentare

Hallo, haben wir in Deutschland Fachkräftemangel? Die Talentschmiede schreibt gefühlt alle zwei Tage dieselben Stellen aus. Und das schon ...

Linux
Limux-Ende in München: Wie ein Linux Projekt unter Ausschluss der Öffentlichkeit zerstört wurde
Information von FrankLinux12 Kommentare

Mein persönlicher Kommentar zum Thema "Limux-Ende". Die SPD-Politikerin Anne Hübner hat die Richtung von München ganz klar definiert: "Wir ...