Visual Basic – die besten Beiträge

Hallo, ich würde gerne eine ganz simple Loginseite erstellen. Ich weiß auch wie das geht, nur ich würde es gern so haben das wenn jemand sich mein Programm Downloadet, sich Registrieren will, und er ein Benutzername(Email) und ein Passwort festlegt, es gespeichert wird. Sodass er sich nicht jedes mal neu Registrieren muss. Also es soll wenn er sich Registriert hat seine Daten auf meinem PC gespeichert werden. Sodass ich eine Kontrolle über die Registrierten Accounts habe. In kurzer Form: Fremde Person downloadet sich mein Programm, Muss sich ein Account erstellen (Registrieren), legt ein Benutzernamen und ein Passwort fest, sobald er dann auf Registrieren klickt, werden die Anmeldedaten ( Benutzername und Passwort) an meinem PC gesendet. Wie es an meinem PC ankommt ist mir egal Hauptsache ich habe irgendwie einen Überblick :3 vielen dank im Voraus :)

Hey Leute,

ich würde gerne in mein Programm das so machen, dass wenn ich die ComboBox auswähle das er mir dann, alle 'Benutzernamen' aus allen Tables der MySQL Datenbank 'Beispiel' anzeigt.

Ist dies evtl. möglich oder gibt es da ein anderen Trick?

Bin über jede Anwort froh!

Bedanke mich schonmal im vorraus

Lieben Gruß

Hallo,

ich möchte mit Visual Basic in der Spalte A jeweils die 4 aufeinander folgenden Zellen miteinander verbinden. Also A4 - A7, A8 - A11 usw. In der Zeile mit range spuckt er einen Fehler und ich komme nicht drauf warum. Wäre super, wenn jemand mir helfen könnte 😁

Quellcode:

Option Explicit
Sub Merge()
Dim Counter1 As Integer
Dim Counter2 As Integer
Counter1 = 3
Counter2 = 7
Worksheets(„Tabelle1“).Activate
Do While Counter1 <= 1000
Range(Cells(Counter1,1), Cells(Counter2,1)).Select = True
Selection.Merge
Counter1 = Counter1 + 4
Counter2 = Counter2 + 4
Loop
End Sub

Hi, ich habe seit längerem ein Problem mit Avira bzw. verschiedenen Projekten (VB). Vor ein paar Wochen habe ich wieder angefangen zu Programmieren und wollte mit etwas leichtem anfangen: Also eine Anwendung, 2 textboxen sollen beide einen bestimmten Text enthalten sonst wird die hintergrundfarbe der Textboxen auf rot geändert. Soweit so gut, doch ein paar tage nach dem erstellen der EXE wird diese von Avira als Virus erkannt: HEUR/APC

Ich habe eben viel gelesen dass das eher am "Verhalten des Codes" liegt wegen einem bestimmten Muster, welches von Viren häufig verwendet wird aber wollte es einfach nochmal selbst wissen. Danke schonmal im Vorraus ;)

Btw. Ich benutze .NET Framework 4.6 mit Visual Studio 2017

Hallo,

ich verschiedene Befehle mit VBA realisieren, um eine Auswahlliste anzupassen. Zum einen sollen Zellen ausgeblendet werden, wenn eine bestimmte Zelle leer ist und daher ein ganzer Teil der Liste entfallen kann. Der Befehl sieht folgendermaßen aus:

Sub HdlZellenVerbergen()

If Target.Address = "$C$9" Then

  If C9 = "" Then

    Rows("164:195").Hidden = True

  Else

    Rows("164:195").Hidden = False

  End If

End If

End Sub

Da ich mich nun Hals über Kopf in VBA geschmissen habe und schon einige Male Internetrecherche betrieben habe, weiß ich nicht wo der Fehler liegt, da mir hier die Erfahrung fehlt. Der Fehler lautet wie in der Überschrift angegeben. Was muss ich machen, damit das ganze nun funktioniert.

Ein ähnliches Problem erwarte ich dann bei folgendem Code:

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$C$8" Then

If [C8] = "x" Then [D22] = "y"

End If

End Sub

Auch hier wäre eine Hilfe super.

Vielen Dank im Voraus.

Hallo,

ich habe in meinem Programm ein Label 1 eingebaut und möchte in dem Label gerne einen automatischen Zeilenumbruch einbauen.

Wie geht das?

Hallo liebe Community,

Ich will mit VBA EInen bereich von Zellen prüfen, ob daten enthalten sind. Dann soll, wenn eine Zelle gefunden wurde, rechts daneben einen wert ausgeben und 3 andere zellen löschen zb:

a1-a20 prüfen. in a5 ist gefüllt, in b5 soll "Erledigt" stehen, und c5, e5 und h5 soll gelöscht werden.

Kann mir da jemand helfen?

Hallo, 

folgendes Problem:

Ich habe eine Picturebox und möchte,dass bei jedem Klick auf diese das Bild geändert wird (aus bestimmten Ordner). Kriege es aber irgendwie nicht hin..

Es sind immer ca. 15 Bilder in dem Ordner (jpg & png) 

Kann man den Ordner der Reihe nach durchgehen?

Vielen Dank im Voraus!

Moin Leute,

ich habe da ein Programm in Excel erstellt und auch den Code, um das Blatt als .pdf in ein bestimmtes Verzeichnis zu speichern. Problem ist nun, dass ich in dem Code den Dateinamen eingeben muss. Der Speichert das also immer unter dem im Code angegebenen Namen. Ich möchte jetzt, dass der Dateiname so lautet, wie ein bestimmter Zelleninhalt von z.B. J5

Wie kann ich jetzt in meinem Code sagen, dass der Dateiname einem Zelleninhalt entsprechen soll?

Sheets("Sheetname").Range("A1:G95").ExportAsFixedFormat xlTypePDF, Filename:="C:\Users\Computername\Dokumente\Ablage\Angebote\Angebot.pdf"

anstatt des Fettgedruckten soll hier der Zelleninhalt von J5 rein

Danke schonmal

Wenn ich mein Programm starte kommt der Fehler:

Die Datei "obj\Debug\Projekt3.exe" kann nicht in "bin\Debug\Projekt3.exe" kopiert werden. Der Zugriff auf den Pfad "bin\Debug\Projekt3.exe" wurde verweigert.

Vorher wurde die Datei von Avira in Quarantäne versetzt, ich habe sie aber wiederhergestellt und zur Ausschlussliste hinzugefügt.

Ich möchte in einem Formular (UserForm) in Excel VBA einen Rahmen (Frame) erstellen, den ich mit einem Auswahlkästchen (CheckBox) in der Überschrift (Caption) als aktiv markieren kann.

Und dieser Link beweist, dass es einen Weg geben muss...

Hallo,

habe in VS 2017 einen OpenFileDialog erstellt (mit TextBox usw.). Möchte jetzt aber, dass wenn ich auf einen Button klicke, dass der eingegebene Pfad sich öffnet. Wie geht das?

Danke im Voraus!

Hallo zusammen

Ich bin relativ neu bei Visual basic und wollte mal eine art Noten berechnungstool programmieren.

Im Prinzip habe ich 2 Eingabefelder, eines erreichte Punkte und das andere mögliche Punkte, mit einem Button soll das dann berechnet werden (mögliche * 5 / erreichte + 1) und das Ergebnis sollte dann darunter stehen.

mein Problem: Wie sage ich dem Programm, dass es nun die Rechnung machen soll?

Hallo,

Ich habe in Excel in der Spalte E immer ein Datum im Format "tt.mm.jjjj". Anzahl der Zeilen ist variabel. Ich möchte ein Makro programmieren, welches mir die vergangenen Tage vom Datum bis heute ausrechnet und das Datum in der jeweiligen Zelle mit den berechneten Tagen überschreibt. Wenn größer 10, soll zudem rot markiert werden.

Kann mir jemand helfen? Hab das mit DateDiff probiert. Hat aber nicht hingehauen.

Danke !

Hallo Leute,

ich hätte ein kleines Vorhaben.

Ich möchte eine VBS-Datei schreiben.

Es soll so ablaufen:

1. Man gibt ein Wort ein, nach dem in einer Word-Datei (wenn's nicht geht, dann .txt) gesucht wird.
2. Es wird die gesamte Zeile, in der das Wort steht, ausgegeben.
3. Es wird die darauf folgende Zeile ausgegeben.

Ist eigentlich mega simpel, aber ich krieg es nicht auf die Reihe.

Für Lösungsansätz, Denkanstöße und Lösungen wäre ich dankbar. =)

MfG,

Arthur

Bitte notiert ausführlich. Ich bin ein Anfänger und weiß nur wenig!

Ist es in Excel möglich mit Visual Basic (Makro) den wert einer Checkbox abzurufen ohne diese mit einer Zelle zu verlinken? zB. Über den Namen der Checkbox welcher ja einzigartig sein muss? Ich habe den Namen in dem Feld oben links umbenannt, er beinhaltet Bindestrich, das scheint VBA auch nicht zu gefallen, gibt's da ne Lösung? Es sollte eine If Then Funktion sein «If RM-CKB1 = True Then..... » Vielen Dank im Voraus

Hallo,

ich möchte in meinem "Besucher" DB einen Wert mit Hilfe eines Buttons um Eins erhöhen. Das heißt: Ich habe eine Tabelle für Besucher erstellt. Dort sind folgende Daten vorhanden:

ID, Vorname, Nachname, Alter, Anzahl_Besuche

Und ich habe ein Formular, für diese Tabelle erstellt. Nun möchte ich beim Klick auf dem Button, dass beim ausgewählten Besucher der Wert für Anzahl_Besuche sich um eins erhöht.

Da ich mich mit Access nicht so gut auskenne (Blutiger Anfänger), weiß ich nicht genau, wie ich das realisieren kann. Ich habe eine Schaltfläche in mein Formular hinzugefügt und nun fragt Access mich danach, was dieser Button tun soll. Der Schaltflächen-Assistent schlägt mir verschiedene Operationen vor, aber da ist nirgendwo was von einen Wert erhöhen oder ändern. Von daher komme ich nicht weiter.

Hallo liebe Leute,

Ich habe eine Excel-Tabelle mit 8 Spalten. In dem angehängten Bild ist ein Beispiel. Nun möchte ich gerne in der grünen Zeile einen Wert zu einer beliebigen Spalte eingeben. Dieser Wert liegt irgendwo zwischen zwei Werten der Tabelle in der jeweiligen Spalte. Dann soll Excel mir die restlichen Werte der übrigen Spalten in der grünen Zeile durch lineare Interpolation ermitteln. In der angehängten Datei ist dies für a=4,87 zum Beispiel gezeigt. Ich möchte nun aber auch mal d=16,66 eingeben können und die restlichen Werte für a-h bekommen.

Hat jemand eine Idee, wie ich das in Excel umsetzen könnte?

Vielen Dank euch allen und viele Grüße!