Excel tool broken with VBA, can anyone fix this?

Hi everyone, A long time ago, with the help of the GF community, I created a tool to help me keep track of my construction site assignments. The idea is simple: an Excel spreadsheet in which I record the corresponding project name for each day, along with a calendar generated using VBA. In the calendar,…

Why does the same error occur in every Visual Studio project?

No matter which project I open, as soon as I change anything in the program code in any project, where I know that I am not doing anything wrong, there is an error in the file Application.Designer.vb created by Visual Studio: Protected Overrides Sub OnCreateMainForm() Me.MainForm = Form1 End Sub System.InvalidOperationException: "Application-defined or object-defined error."…

How can I solve the problem with my VB program?

I created a program (in VB) that can extract MSI files. It just doesn't work. It never finds them. Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click OpenFileDialog1.Filter = "Windows Installer Pakete (*.msi)|*.msi" OpenFileDialog1.FilterIndex = 1 If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then TextBox1.Text = OpenFileDialog1.FileName End If End Sub Private Sub…

Bash script problem?

#!/bin/bash echo "Typ des Betriebssystems = $OSTYPE" # If-Schleife, die das Betriebssystem erkennt und den Pfad zum überwachten Ordner oder Datei festlegt if [[ "$OSTYPE" == "linux-gnu"* ]]; then BASE_DIRECTORY="Linux-Ordner" elif [[ "$OSTYPE" == "darwin"* ]]; then BASE_DIRECTORY="/Users/name/Library/CloudStorage/GoogleDrive-eineemail@gmail.com/Meine Ablage/Uni/TestOrdner" elif [[ "$OSTYPE" == "win32" || "$OSTYPE" == "msys" || "$OSTYPE" == "cygwin" ]]; then BASE_DIRECTORY="/g/Meine…

Excel Colorsum result automatically updated?

Hi, I inserted the following code into Excel using Visual Basics: Function ColorSum(ByRef Source As Range, ByVal Color As Integer, Optional ByVal ForeOrBack As Boolean = -1) As Double Dim rng As Range, dblSum As Double Application.Volatile If Color < 0 Or Color > 56 Then Color = IIf(ForeOrBack, -4142, -4105) For Each rng In…