I'm trying to design a tool with vba that converts one table to another where one unique id appears per row while others variables populate the colums behind.
Thanks for your help
I am trying to parse the following.
Column H is my source that I am trying to parse. Part Description
Column I is the first sub part (always starting on the left hand side and continuing until the first space in the text) various lengths and various starting text (HKL vs E, etc..)
i am very new in codes specially in VBA. My intention was to make a template in excel for reports in my job, it will replace words from excel to a special template in Word and at the end it will load an image from a folder in pc give it other size and rotate for example 90°. this is the code i...
I'm looking to run a VBA code from Sheet3 (Consolidated Report) that will check ID1 in sheet2 and when found it has to copy from Sheet2 ID2,Owner,Role,Role Status, and Role Title and insert copied cells (Cells shift down) respecting the cell in column A as the copied data starts from...
I am looking for macro where i want to move emails from one folder to another folder in outlook where i have word file as attachments. before moving email to the another folder it should read the footer in attachment (word file) and compare it with the list i have. then it will check if the...
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...
Good day all
I have a table that contains data of teachers timetables. Columns - Monday to Friday, rows are the periods of teaching. Each teacher's TT is below the next so separated by a blank row.
I want to create sheets for Monday to Friday and then copy each teacher's Monday, Tuesday...
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?
Private Sub bt_calculate_Click()
Private Sub CheckEmpty()
If Not IsNumeric(tb_x1.Value) Or tb_x1.Text = "" Or Trim(tb_x1.Text) = "" Then...
I created an excel file that runs a macro as soon as it starts, when I open the file normally the macro is successfully executed but when I open my ".vbs" file an error occurs, can someone help me?
Dim myMostRecentFile As String, ola As String
Dim Ws As Integer
Private Sub WriteValues()...
Good afternoon friends, is there any way to write a value in a specific cell on each sheet of the excel workbook using "Foreach" or in some other way?
Example: Write the number 3 in cell A3 of each sheet of the current workbook
I am trying to open the most recent file in a specific folder but when I run the program an error appears and says that the folder does not exist (but it does exist), can someone help me?
Private Sub WriteValues()
First I would like to tell you what I have been doing so far and then request your help.
I have this excel file which is mainly made up of two sheets:
1. Apartment information sheet
2. Sheet to make quotes for the apartments
In the quotation sheet, I have a cell where I...
Hello guys, i have a problem in my procedure, everything that happens before trying to execute the procedure is read by the program,
but when we call the procedure it doesn't just work in the specific form, can someone help me?
This codes works:
Private Sub bt_calculate_Click()...
Encountered a weird issue today as I added editing features to my UserForm. The fourth ComboBox is giving me a property value error when I try to populate it, despite the previous three working and the VBA editor calculating the value correctly.
The right side is returning a value, but the...
Dim oPL As Double, o709 As Double, o710 As Double, o713 As Double
Application.ScreenUpdating = False
Sheets("Calculation_Sheet").Visible = True
Note: P666, P709, P710 and P713 are global variables...
I am trying to write a VBA module to help me identify the source of an excel file that I am given based on known cell values in the header. For example if ""Service Waiver Acknowledged"" exists in any position of the range A1:Z5 then I know this file came from Software1 whereas if ""AnnivDay""...
I am missing assigning the list property for a class module to work. Hoping someone can point out what I need to add.
I lifted a module from the internet to align columns independently in a listbox of a userform. I will show the initialize code first and the class module code second, as the...
Private Sub UserForm_Initialize()
lb_hello.Caption = msg
lb_tec.Caption = Tec
Dim mHour As Integer
Dim msg As String
mHour = hour(Now)
If mHour < 12 Then
msg = "Good Morning"
ElseIf mHour < 18 Then
msg = "Good Afternoon"
I am trying to populate a ListBox with a dynamic range, but I get a mismatch error on the .rowsource assignment. Hoping someone can shed some light on how I am supposed to assign the dynamic range to the row source.
Private Sub AddButton_Click()
'Add Item to Order
Dim OrdSum As Worksheet...