excal vba

Hi, I have the data sheet "DataCompile", which I tried to use if...else if to return value into column M, if the criteria in column N is met. However, no matter how I change the coding, it will not return other value, and only return the largest value, which is "60%><=100% Yield". What should I...

I have 28 tabs of data (named AB, BC, CD, EF, FG, GH, HI, IJ, JK, KL, LM, MN, NO, OP, PQ, QR, RS, ST, TU, UV, VW, WX, XY, YZ, Z00, Z01, Z02, Z03) in my spread-sheet with varying data (columns and rows are inconsistent) in each tab. I need a summary tab with count of each column per tab(only...

Hello! Sorry for bad english, I really hope, you do understand the question. I have problem. My Paste works well, but I lost my "Next enter ID" I need to show at sheet "P" (Sheet1) in Cell "A1" last number on a last row from sheet "p_koond" (Sheet2) Column A, but it does not appear as...

Hi Everyone, these shapes below I make it as a button for changing data when press on it, my question is I need to change the text color of shape once press one of them (using a macro), also when press to another shapes the color followed and be the other as the same original color.

Hi All, So I have this code to multiply entries made in J9:L9 by the value in the same column cell 4. Private Sub Worksheet_Change(ByVal Target As Range) If Application.Intersect(Target, Range("J9:L38")) Is Nothing Then Exit Sub If Target.CountLarge <> 1 Then Exit Sub On Error GoTo catch...

I have a jagged array containing normal values and formulas in R1C1 notation and I want to write it into excel. I used following code for the same dataRange.Value2 = jaggedArray; But it produced unexpected results in case of column anchored formulas like '=$A1'. I got it fixed by rewriting...

Hi all, I need your advice in what i am doing wrong. I can generate random numbers using the below code but i cannot add a prefix of "HTC" to the numbers generated using the below code. Sub GenerateRandoms() ' Define the minimum, maximum of the range and how many random ' numbers are...

Hi, So i am new to vba and need a little help with a vba coding problem. My code is copying data from one workbook"Raw customer data" to second workbook "Customer Data-Base". I need to modify this code so that if the customer ID from " raw customer data" workbook present in cells A2, A21 and A39...

Hi Right now I open a new worksheet in my code and go back and forth by doing thisworkbook & previouswindow. This goes wrong if I have a third workbook open and it just managed to delete a bunch of formulas the original document. How do I open a new workbook and immediately say this workbook...

I am trying to I am trying to write a macro to loop through a column (Z), & find the cells with a "Yes" in them. When a Yes is found I am trying to generate the following Msg “"Check to verify veteran data is entered in FY ## REFERALS. "It's critical that the veteran data is captured." & “You...

I am using the following code to create an email list of unique emails. The list has a lot of duplicates, but I only want them once. Some of the rows have not been assigned an email so they show as "UNASSIGNED" <unassigned>and I want to ignore those. I have used this in another sheet where it...

Hi guys. I have bit of code that clears a sheet, before it does that I have it save to another location (just incase the user pressed the wrong button), my question is, is there a way to notify the user hat the save is succesful before thy carry on? Here is hat I have already. If...

What I need is a little more than what I could fit in the title the 3 steps are illustrated below and there is a gdrive link for the example file. (I could not work out how to create editable cells in a post; (tried it in a test thread). Put simply I have titles associated with codes. I need to...

Hello, I should make excel vba that queries 80 databases and writes the info in excel. Is this possible and how to connect to 80 databases? Here is example with the connction to one database: Sub ConnectTOOracle() Dim cn As New ADODB.Connection Dim RS As New ADODB.Recordset Dim Cmd As New...

I have 2 sheets that i need to merge into one but the format is not as simple so it cannot be just copy pasted. But i feel there will be a way to do that with a vba. Hoping to get a solution from here. here is what I am looking to do. First column is "Source URL" and Second column is "URL"...

Hello, my friends I m trying to generate alphanumeric ID based on combobox value, but facing error. Type mismatch. Runtime Error 13. Please help me Thanks in advnce Option Explicit Sub GenNextTID() Dim ws As Worksheet Dim lr As Long, x As Long Dim myName As String, lstNum As Variant Set ws...

Dear Friends , i am struggling with Vloook as i am new to VBA , i am trying to get the values with the help of Vlook up once workbook gets opened unfortunately not getting any values , its blank not sure what is wrong with the code Sub Open_Workbooks() Dim wb As Workbook Dim lastrow As Long...

I am trying to create a Excel VBA Macro to find bold text within cells with non bold text and add html bold tags around the original bold text and leave the non bold text alone. Example: Find: "This bold word" and Replace with: "This <code style="margin: 0px; padding: 1px 5px...

I had a code to prompt for two different inputs to search another sheet and the delete the entire row if two conditions where met (entry ID $ and date). I adjusted this to re-select the data worksheet, because it was originally also deleting the actual row of the worksheet that this button was...

Hi All, I'm very new in writing VBA. Please help me in activating already open workbook. Following is the code i'm using but don't know how to complete it. Please help. Sub AssessmentDataPaste() Dim MyPath As String MyPath = Sheets("Main").Range("C7").Value ' Pop-up a...