Question and Answer

For Excel / VBA questions - You ask, Excel Experts will answer

xlLeftToRight sort not reordering column headers during sort.

Hello. Been struggling with an issue for days now. I have a range of data that needs to be re-ordered from left to right descending and although I have the values in the range sorting, the corresponding headers are not sorting.

An example would be:
COL A B C
Row1 Abe Ben Cat
Row2 1 2 3
Row3 1 2 3
Row4 1 2 3
Row5-sum 3 6 9

And my sort is like this:
Range("A1:C5").Select
ActiveWorkbook.Worksheets("(2) Data").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("(2) Data").Sort.SortFields.Add Key:=Range( _

Look up help

Help please, this is probably very basic but I am not good with this type of formula. My workbook has two sheets. In both sheets columns A, B & C have the same type of information a customer number a location number and a service number. I need a formula that will return a value from column J in sheet 2 if the numbers in columns A, B & C are identical in Sheet 1 ie.

Show Installed Digital Certificates programatically using a Macro

Hi, need your help:

How do I code to show the certificate information (mainly the name) for the digital certificates installed on my system. They are stored in 'Certificate Store'. The user needs to select from the certificates available (installed).

Umm, Conditional Sum of the Product function? Pure numbers.

I've found how to create an array of the products of variables input into column A and row 1. Thing is, their increase in value is exponential. How do I calculate the sum of each individual integer in the product of two cells (as inputs to a new, as yet used, cell) until I have a value as a single integer?

Example: the value in cell C2 is 16. The value in cell B3 is 16. These two multiplied together, to form a new value in cell C3, become 256. 2+5+6=13. 1+3=4. How do I get an input of 16 twice (again, in cells C2 and B3) to become 4 (in cell C3)?

vba to call macro in another workbook

hi,

could you please help me with this code it says object defined error 1004 I have a workbook named muddmmyy the date is variable I want to call a macro in "ThisWorkbook" sheet

I want to call it from another workbook could please help many thanks

Application.Run ("MU" & Format(Sheets("Main").Range("C6").Value, "ddmmyy") & ".xlsm") & "'!ThisWorkbook.Macro"

Copying and pasting dynamic ranges

Hope you guys can help me out with this

Background:
I am trying to build an activity manager for my sales team. Each one of them will hold a standardize template in which then they will update their appointments and then saved into a general folder. I then want to consolidate my entire team's activities into one sheet so that I have the master view

Where I am:

Activity Log

Vlookup with If or Index Match? HELP!!

Hi Guys,

I hope you can help. I've been trying to workout a formula to match to a certain criteria.

I have a reference unique for both sheets, in column A, need to look up to column AI only if a value in column P meets certain criteria, in this case matches a word SER.

i've tried
=IF(ISNA('[CRITICAL PATH.xlsx]CP'!$P:$P="SER"),"",VLOOKUP($A:$A,'[CRITICAL PATH.xlsx]CP'!$A:$AI,35,0))

but it returns the first available criteria rather than the first one matching SER.

I also tried

Formula For Calculating PTO Days

In excel, I need a cell to calculate the following formula for my paid time off spread sheet.
Earn 1 day per year for years 1 and two
Earn 2 days per year for every year after.

Thanks for any help you can give.

Unsupported data cannot be repaired or removed.

When I try to open excel file, it says it is corrupted and the file has some Unsupported data and if i proceed to open, it says the "Unsupported data cannot be repaired or removed".
Any idea how can I repair it? Please suggest me smth
Thanks

Corrupted Microsoft Excel Macro-Enabled Workbook xlsm file

Hello

I have a corrupted Microsoft Excel Macro-Enabled Workbook xlsm file. Does anyone know how i can restore or recover it please?

2.jpg

binding a number key to a macro

Basically, i want to be able to hit 1 and have a macro run. I found this code, though i dont know how to bind it to a macro.

So if i make a simple macro like;

Sub Adding()
'
' Adding Macro
'

'
ActiveCell.FormulaR1C1 = "=RC[-3]+RC[-2]"
Range("D2").Select
End Sub

Then make a new module, and put in;

Sub test()
MsgBox "Hello"
End Sub

Sub Shortcut1()
Application.OnKey "1", "test"
End Sub

How do i bind the macro to this hotkey? Or rather, how do i make the macro run when i hit the 1 key?

Arrange multiple columns into one

Please help me according to image.

Thanks

1.jpg

Moving data from a column to a row

Hi,

I have a list in Excel that looks like this (SAMPLE - there are 30,000 rows really);

Is anyone able to advise how I might turn this into a single row for each contact with a cell in that single row for each of their interests?

Thank you in advance for any suggestions!

Tim

How to auto link columns from different sheets for a template

I am trying to setup a template that will auto work with our Revit exported spreadsheet. I have had no problem with it until I get to linking the quantities per room. I want to have it search for the right item number and then proceed to list the quantities and the room names down the list in order and then not put in "0" or miscellaneous text from somewhere else, I only want it to read each item's info and not skip to another. See attached images for a better understanding. Is this possible?

How to combine 2 sheets with duplicate data in one column keeping all data from both sheets

I have 2 sheets of data in an Excel workbook. In sheet 1, I have rows of data consisting of 3 columns with a UPC number in column A, cost in column B, and retail price in column C. in sheet 2, I have the same UPC codes in column A and a Item count in column B. I need to combine the 2 sheets so that I have 1 sheet with 4 columns consisting of UPC code, cost, retail price and item count. Is there a formula or operation that I can run that will combined the 2 sheets this way?

Increasing a SHEET number

Hi All,

This may be a request too far and I'll understand if I'm chucked out of the forum, so forgive me in advance.

I am not a programmer, and have very basic knowledge of Word VBA - none of Excel VBA, and have taken over a role which involves using a macro created by my predecessor. Up to now it has worked perfectly; however, the goalposts have been moved and I'm struggling to sort out the problem.

To Count Unique Value with Pivot

Hi all,

I have a question, really hope that you guys can help me.

OK it's like this, I have 1D data, headings are, for eg
1. Outlet Name
2. Date
3. Product Name

I insert in the FIELD as :
ROW = Outlet Name
COLUMN = Date

How do I obtain the VALUES, as, 0 & 1. 0 = Outlet Name not appear at that particular data, 1 = Outlet Name appear for certain date.

Do you get, what I'm trying to say?

Really hope you guys can help me in this one.

UNION VBA

I have 2 worksheets which I would like to UNION on excel but do not know how.

Sheet1: Call Schedule - Contains list of customer which I plan to visit - contains 77 recordds
Sheet2: Call Extract - Contains list of customer calls which have been executed - may be executed with the customers in "Sheet 1: Call Schedule" or could be with new customers which did not exist in call schedule. contains 105 Records

What I am trying to do is to combine the 2 files to show
1) the 105 records in "Call Extract"

Conditional Search Copy Entire Row to next row on match

First time VBA user using Excel 2010 part of Office Pro 2010.
I need to search for data in col 2 and if it matches then copy that row to row below.
Search terms are "A" OR "D"

Before

Num Reg Com 1 Com 2

2 a yes no
3 b no no
4 d yes yes
5 c no no

After

Num Reg Com 1 Com 2

2 A yes no
2 A yes no
3 B no no
4 D yes yes
4 D yes yes
5 C no no

Don't really have good idea how to do this.
Have found these commands, but don't know if it will work.

Cells.Find(What:="A", After:=ActiveCell, LookIn:=xlFormulas, LookAt _

Convert acres to SF

I cannot figure out how to do a simple task. I want to input acres in column E and have Excel convert to SF and put result in column F. I have read all MS help on this but still stuck. This formula is the best I can do but it does not work & I cannot figure out why not.
=CONVERT(E4,"us_acre","ft2")

Join separate lists into one long list

Each month I receive a spreadsheet that contains among other things various lists typically 50 to 200 items long in the format

B12345
S23456
K98765

I would like to be able to join all these lists together into one long list and haven't been able to find an easy way to do this. Currently having to manually cut and paste each list to 'join' them together.

The lists wouldn't necessarily be in the same locations each month but I could get the columns alongside each other if that would help!

VBA to Extract Home Values from Website

Please help!! I wrote some code about a year ago that queries the Zillow website and extracts values. It worked great until they made some slight changes to their website and now I'm not able to troubleshoot it to get it working again. Any insight or assistance would be GREATLY appreciated.

Cheers!
Michael

Auto Extracting Data from Excel file on Onedrive

Hi Guys,

Our team is using One Drive for file sharing. What we wanted to do is to be able to Auto Extract data from 1 excel file on OneDrive to another excel file to be saved on another OneDrive account/computer.

For e.g., Person A (The manager) would have onedrive acess to the main file, but all other people (the sales people), would only have access to their own onedrive account and can only see the data next to the column where their name is mentioned.

So if the data looks like this:

Project Sales Person
Project 1 Anna
Project 2 Ben
Project 3 Anna
Project 4 Anna

VBA Run Time Error 51 tied to Excel 2003

Hi I experiencing an issue for an urgent item - this macro works fine in excel 2003 but pukes if run in excel 2010. I get a runtime error 51 and i think all i have to do is wrap the time_interval with something (ex. XX(time_interval) - but i don't know what xx is).The particular line that has an issue is:

Num_of_Cells = (end_time - Start_time) / Time_Interval

Can someone please help

Nooreen

____________________________________________________________________________________

Private Sub Submit_Hours_Click()
Dim Time_Interval As Date
Dim Quantity As Integer

Loop Help

I am trying to do a loop but my it has been a long while and I just forget. I am trying to run through a 1000 lines of data which the converted pdf leaves notations of pages and headers. The code runs and does what it is supposed to do but at the end, I get a debug error of the Find code. "Object variable or With block variable not set." I guess I need an else or exit but don't have a clue

Code

Do While Cells.Select <> " "
If Cells.Find(what:="----------------------- Page ", After:=ActiveCell, _
LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, _

Need to make FED EX tracking numbers clickable in excel

Hello! I have created a spreadsheet and need help on how to make the TRACKING numbers for FedEx click able to track that number. The only thing I have figured out to do so far is to add a hyperlink into the cell that will take me to the page on FedEx.com, but then the customer has to enter the actual tracking number to track it. The only other way so far is for me to insert the hyperlink into each cell... and type in each tracking number .. which I can't do.. it's for a lot of different customers.

Please help! :(

Capture.JPG

Clear a cell when inputting data in a different cell

Hello,
I have a dual thing to do on a spreadsheet. I would like to put a date in one column (lets call it cell A1) which would in return put another date in a separate column but it would be dated 30 days ahead (let's call this cell A3).
Then, then I put a date in a totally different column (cell A2), it would clear the cell that has the 30 day future date (Cell A3).
I want to be able to do this in several rows, approx 200. What formula in VB would I use for all of this?
HELP!!!!

merging two formulas

I want to add IF(AND(R9="Y",R10="Y"),Z9,"") +

Create a grouped frequency distribution using vba

Hi, I have a list of 225 numbers which I've grouped into 8 intervals from <30 to >=90 i need to create a frequency distribution out of this data. However, I'm not sure where to begin with the code that i need to write this. Then from this I would like to create a histogram. Any help would be much appreciated, thank you.

Multiple dependent picklists

Hi folks, I am trying to create a training menu planner. On my first sheet I have the type of day Training/ Rest and then for each day I have five meal options and each has to be made up of 6 variables. On sheet 2 I have I have twelve lists that give the options for each of the variables (training or rest). I was hoping that by selecting training or rest from apicklist in column A I could write formulas that meant that each of the variable columns selected from the correct list however this is where I'm stumped. Any ideas. Template shared.

Syndicate content