programming

I created a macro that detects if the user has entered invalid characters or if the "Textboxes" are empty, but the program is returning the wrong value, can someone help me? Code: Select Case True Case Trim(tb_morada) = "" And Trim(tb_cod_postal) = "" Or (Not IsNumeric(Len(tb_cod_postal)...

I'm creating a "Database" in Excel, for that I created a Form for users to register For this Form I created a procedure to check if the fields contain invalid data or if the textboxes are empty the problem is that even if a specific "Textbox" is not empty, the program displays the error...

I'm passing values from one Excel sheet to others, it turns out that the variable P666_2 has the value "xxx.xxxx" but when the value is passed to the other sheet the value is in the format "xxxxxxx,0000", can someone help me solve it this problem? Sheets("Calculation_Sheet").Visible = True...

I'm creating a database in excel, I have 2 forms, one for "login" and one for the user to register", in each form I have 1 textbox for the username and another for the password, when the user enters the password I would like each character entered to be presented in the textbox as a "*" but the...

I'm creating a macro for a login screen that I'm developing to make excel a "database", the following code is to check if any "textbox" is empty, if the 2 "textboxes" are filled, the macro will check if there is a user whose name and password are connected, but the program crashes when i run it...

I'm trying to insert values into an excel table with the help of an array, it happens that when the program executes only the first value of the array is inserted in each specified range, how can I change this? Private Sub FillCells() Dim myarray_ac_before As Variant, marray_ac_after As...

I'm trying to update a chart every time a record is inserted in the last line of Excel, so I created a variable "k", the problem is that when I run the program I get an error that I can't solve, can someone help me? Code: Public Sub Chart_Update() Dim k As Long k = Cells(Rows.Count...

I created a code so that each time a record was inserted into a line the program would detect the last line with values (assigned to the variable "k") and select a specific interval for the graph to update, but an error occurs, could someone help me ? VBA Code: Public Sub Chart_Update() Dim...

Criei um código para que cada vez que um registo fosse inserido numa linha o programa detetasse a última linha com valores (atribuido á variável "k") e selecionasse um intervalo específico para que o gráfico atualizasse, mas um erro ocorre, alguem me podia ajudar? Public Sub Chart_Update()...

I created a dynamic chart that allows organizing the data according to the name of the field "Machine" and the "Data", the problem is that instead of the chart showing the values of each field it counts the number of values entered on the same date, someone can you help me? I need to insert...

How can I do to assign the value to my cell according to the "SUM" function (present in another Workbook) Set sh = Workbooks("EEC QEC.xlsm").Worksheets(counter2) k = Workbooks("EEC QEC.xlsm").Sheets("QEC 1.2 - montagem").Cells(Rows.Count, "H").End(xlUp).Offset(1).Row Workbooks("EEC...

I created a macro to insert data from an excel spreadsheet into another Excel file, but when I run the program the error "the specified dimension is not valid for the current chart type", can someone help me? Variables (Module2) Option Explicit Public myRecentFile As String Public counter...

I created a code to pass data from one excel file to another (it is a little confusing project because I am in a company), I believe that the code is correct in general but when I run the program it gives an error called "Object Required" in the variable " k ", can someone help me? Module...

I need to use the "range" parameter to select a specific cell, it happens that when I "run" the program it gives an error and says "The specified dimension is not valid for the current graph" Error -------------------------------------------- If Range("H(CStr(k))").Value = "" Then...

I am trying to create a macro that passes values between 2 different excel files, I tried to create a counter whenever the values are inserted in the spreadsheets, the program does the same for all the spreadsheets available in these files, in case the cell where the value will be inserted the...

I created a code to open the most recent file in a specific folder and copy the value if a specific cell to another in a different excel file, the program executes everything, including I receive the value "msgbox" but the values are not written on the second sheet " EEC QEC.xlsx ", could...

I want to make a macro that just inserts values in cells where the name of the worksheets is different from "Potable C1", "Potable C2", "Potable C3.1", "Potable C3.2", the code is not working because it is writing in all spreadsheets, can someone help me? Dim sh As Worksheet Dim counter As...

I have 3 columns A - Equivalent to "Machine Name" B - Equivalent to "OT Number" C - Equivalent to "Responsible Technician" I would like to know if it is possible to create a procedure that when the user inserts the "OT Number" the procedure looks in column B if there is already an "OT...

I have a form called "Miter_2_Correc", and I don't know why vba won't let me open it, can someone help me? Code: Private Sub bt_calculate_Click() Call CheckEmpty End Sub Private Sub CheckEmpty() If Not IsNumeric(tb_x1.Value) Or tb_x1.Text = "" Or Trim(tb_x1.Text) = "" Then...

Is it possible to create a vbs file similar to the same one but that is automatically executed when a new file is inserted in the folder?