#excel

I am trying to create a code which checks if the Dictionary value exits or not in the Column A. If it does then check the value for 24th Column of that particular row. If the value in the 24th Column is not 7 or 4 then delete the entire row. No error message is shown when I try to run the below...

Dear all, Happy to join mrexcel ! I have an brain teaser with VBA. I want to create a macro that will color: - Hard coded cells in blue police. - Formula (ex: vlookup): In black police. - Linked cells (ex: =Sheet1!$B$5): In green police. Do you have a code that could work out ...

Hi all. I have an a list formula defined as such in my excel template: =OFFSET($A$2,0,0,COUNTA(OFFSET($A$2,0,0,5000,1)),1) If I delete one(or more) rows from anywhere beside the "first" ,actually the 2nd row where my offset points, it works ok. But if you delete the A2 row, the formula breaks...

Below is the desired output: Start of the email text Part 1 Text Attachment1 & Attachment2 Part 2 Text Attachment1 & Attachment2 End of email text However, my code seems to add the attachment files only after the Part2 Text. Could anyone please help me with the code? Sub Prepare_Drafts()...

I am working on a file wherein I have to add multiple attachments within the Outlook mail body using the RICH TEXT function. Below is the desired output: Start of the email text Part 1 Text FILE 1 & FILE2 Part 2 Text FILE 1 & FILE2 End of email text However, my code seems to add the...

Good day all, I have the following VBA code below to help show when a change was made in one of the columns in my Excel spreadsheet as well as the username however, I am finding difficulties when I am testing my VBA code. I can only retrieve the username/time stamp if I double click on each...

I have a macro enabled excel sheet - Sheet_Change.xlsm My goal is to check if a columns A and C only - are empty or not within a table. If cells are empty, then a message should appear and user shouldn't be able to enter a new record (row). It is currently works on any "Change" event. But I...

I am getting an error when I run the below code. Not sure what is creating the issue. Can anyone help me with the code? Sub Mail_Selection_Range_Outlook_Body() Dim rng As Range Dim OutApp As Object Dim OutMail As Object Set rng = Nothing ' Only send the visible cells in the selection. Set...

Hi everyone, Hope you good guys. Since 1 week, I try everything in my possible and nothing works... The goal ? => I have a form that lists differents values in my cells. In this list, I have a search bar and I have to double click on a item to have what I want after. When I double click, another...

I have a code that loops through all the outlook emails under a subfolder and extract the body of the email based on the subject. How do I modify the code to only append the data extracted from emails in the existing file instead of looping through all the emails and overwriting again & again...

Hi. I keep getting an error as Invalid Next control variable reference for my below code. Any help would be greatly appreciated. Option Explicit Sub ImportTable() Cells.Clear Dim OLApp As Outlook.Application Set OLApp = New Outlook.Application Dim ONS As Outlook.Namespace Set ONS =...

I have a VBA code that extracts table data from outlook emails but from a particular subfolder. I want to generalize my code and instead of searching in a particular subfolder under "Inbox", I want the code to filter the emails directly from the "Inbox" folder and then extract the tables from...

My Formula Problem this above condition , Not show Proper Format We Need this Format Result : EXP/025/21-22 Kindly Correction Below Formula , and Show Perfect Formula in this case =LEFT("EXP",3)&"/"&MID(A2,5,3)&"/21-22" Help me !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Between two Slashs "/" Or Two and more Slashs how to work formula in this condition

Hey you! I was trying to tweak the code provided by mumps in this thread: Find missing values between two columns with VBA With 0 success and I'm super desperate, however, I need to have this solved today in order to go to bed peacefully. The workbook is used to have an overview of Product...

Hi, I am trying to delete the entire row from 2 sheets in one go if it finds a match from another sheet. The below code shows an error and highlights UNION. Got no idea how to fix this. Sub custom_Remove_Entities_NewTemp() Dim Cl As Range, Rng As Range Dim v1, v2, v3(), i, j, k, r, c, nr...

# How get Sum value via "HSN Code" vise ?????? Advance Condition : "if 100 or More Entries in sheets how it possible to solve query via Formula this Concepts " (without pivotable / without filter/ without VBA)

I want to delete rows if the code finds a match from the list in another sheet. The below code does not delete all the rows where the match is found in one go. Sub Delete_Newlyadded() Dim Cl As Range Dim Dic As Object Set Dic = CreateObject("scripting.dictionary") With...

The code finds a match for the each cells in Sheet2_Column_1 from Sheet1_Column_1....If a match is found then replace the range in Sheet2_Columns_1 to 5 with Sheet1_Columns_7 to 11. The blow code only replaces the cell data in Sheet2_Column_1 with Sheet1_Column_7 when the match is found. Is...

Hi! I'm having trouble writing out the syntax for a VBA code that compares two workbooks. I have the logic figured out, I'm just not sure how I'm suppose to write it. The Logic goes as follows: if classification is equal to "fruit" then check group number if group number is equal to "1" then...