I need help on how to do this.
I have a list of parts in cell A1 to A10 in sheet1. And I have all the parts photo in sheet2. What I want is, when I move my cursor to the name of the part in sheet1, say is .. A1, then the A1 photo from Sheet2 will show up at a defined cell so that I know how the parts look like.
I'm having some trouble setting up my Userform. It's used for someone to insert a password to open up some sheets. I have it working except for 2 problems.
First off it gets started by a sub which has a shortcut key, CTRL + W.
When it opens I would like the TextBox to be ready to be typed on... and I would like the submit button ready for Enter. So when it opens, you just type in the password really quick and press enter without using the mouse at all.
The TextBox starts on the first try, but when I press cancel and then open the UserForm up again, then the cancel command is still selected and I have to select on the textbox.
There is 3 things on this userform... TextBox1, CommandButton1, CommandButton2. All I want is for the TextBox always to show up ready for typing, and the Submit(CommandButton1) to always be ready to press enter.
I have an excel file with about 200 images! This increases the filesize too much. So, I want to (if possible) have all the 200 images in different files, but still show all the pictures directly in Excel like before, without having the directly imported into excel. So, easy explained: I want to show a picture directly in excel that is in another file without having the picture increasing the filesize as before! How can i do this??
I have folder with 5 photos on c (c:Pictures). Photos are named a, b, c, d, and e. In Excel workbook sheet1 (c:Photos.xls), how to display the photos in cell range (B1:F10) in response to change in cell A1 (i.e., when A1 cell value is “a”, the photo “a” is displayed in the range B1:F10, and so on when the A1 value changes)
I am trying to do, is make a drop down list show the picture above it. I have tried to change everything, and I am sure I am just a hair away from getting it right. I got the spreadsheet to where it will pull up the "Picture #" in the appropriate box, and even had it delete/hide all my pictures (I say delete/hide because I couldn't get them back after I removed the coding I was working on).
Another nice function I would like would be a button, around cell B74, to erase all the picks and reset the sheet for the next season... it would have to have a prompt to verify the user was absolutely sure they wanted to do that though! But I don't know where to begin on that button issue. Can someone point me in the right direction?
The spreadsheet is too big to attch, so it's hosted at the link below. The sheets involved are NFL Survivor & PicTable. On sheet PicTable, the Names & Pic #'s have already been named PicTable for ease of coding.
macro which can show a picture of a certain cell and if I change the value of that cell the picture will be changed to the new cell value,
Like
If I put in cell A1 value DOG, so the pic in cell B1 is a dog pic that I defined before, and if I change that value to a cat, the pic should be changed to another pic.
I have a spreadsheet that queries the web for a weather forecast each day. I'd like to associate pictures on the excel page based on the weather description, but can't figure out a way to select /change the picture automatically.
I am working with a VBA userform and several textbox's, setting SetFocus and or TabIndex doesn't leave the box ready to accept input and there is no cursor shown to indicate it is ready to accept input.
I have a pivot table as shown below which is pretty straight forward however I am trying to create a macro that will automatically change the point name to match the point name in column E then copy that resulting dispaly to another sheet then pick the next point name in line and do the same thing and repeat for 50 rows, so my end result will be 50 pivot tables ready for printing. I can do this manually but I am trying to make it automatic...BTW the point names in column E change everyday but the pivot table supports the name changes.
Option Explicit Sub PointName() Dim Ws As Worksheet Dim Rng As Range, Cel As Range
Set Ws = ActiveSheet Set Rng = Range(Cells(2, 7), Cells(Rows.Count, 7).End(xlUp))
For Each Cel In Rng Ws.PivotTables("PivotTable1").PivotFields("Point Name").CurrentPage = Cel & " "
Ws.Columns("A:B").Copy Sheets.Add With ActiveSheet .Paste .Name = Trim(Cel) .Range("A1").Select End With Next Ws.Activate End Sub
I turned it off for a while and when I turned it back on I am getting an error Unable to set the _Default property of the PivotItem class
Debugger is highlighting
Ws.PivotTables("PivotTable1").PivotFields("Point Name").CurrentPage = Cel & " "
Currently, all of our data in Excel are linked by using Excel Functions between workbooks and some of the files are so large that it may take 10 minutes to open and copy and paste a cell may take three minutes (which is ridiculous slow).
Pardon my ignorance, my understand of Excel VBA/Marco is about automation. Even i use marco to run the excel, i still need formula in the cell in order to perform the task, right?
Is there a way too get the SaveAs box come up with a marco? When you go too file and save, a box comes up and lets you choose where and what you save. I would like too have it come up with a command button if its possible.
when i run this marco, i get a Password msgs box appear, now is there away of running it so that it does not ask for a password, I have tried to unprotect the sheet with a password which works, but it never re-protected it self,
I don't know that much about VBA and my programming knowledge is very limited. I dont want the code re-written, as its someone elses work and it does what i want, i just need to know if an extra line can be entered to stop the password msg box. I.E. it needs to run without asking for the password
In Excel 2010, is there any way to paste a picture into a small picture/diagram box, and upon double clicking the picture it would explode to a larger size? And I guess double clicking it again would make it return to its original (smaller) size. I would be pasting several pictures into several different picture/diagram boxes and would need this to be a relative reference so that upon selection it explodes the appropriate picture?
I am trying to program a drop down box at the top of a column so that when one of several options in the drop down are selected, a corresponding price list is displayed in the column below.
I want to have a sample file in excel which store picture of student in comment, I did this, but when I want to insert picture the file dialog appears, and if I click cancel, then there is an error, why? If some one optimise the code it would be very nice
I have a line of data (say from B6 - S6) in cell S6, when i put in the word 'complete' i want the whole line of data to move to say line 34 - clearing line B6
I am trying to add a macro that will sort everything by what is in column A (not the first row though) and then have it expand the selection to the entire row and sort it. so basicly it would do the same as me clicking sort and filter and then selecting sort largest to smallest and then selecting yes to expand the selection. I have found some that sort only column A but nothing that changes it all.
I am trying to create a pivot table macro to append to the end of an existing macro I already created which formats the data prior to the pivot table.
Here's the Pivot table setup info if if I was setting up the pivot table manually:
1) Column C (column header row = "D C/D") to be PAGE 2) Column G (column header row = "MN") to be ROW 3) Column A, B and D (column header rows = "TT", "NT", and "CC") to be COLUMN
Sum of Column E (header GA (DA)) and Sum of Column F (header TFA) in DATA ...
I'm looking for is something that searches all worksheets in the work book for occurances of A1 (shovel) and replace it with A2 (spades). The list will be about 100 cells long and the idea would be that I could copy a sheet called "replace" with this list in, run it and standardise all the terms in the list within that workbook. Does it sound feasable?
The other query I'm not sure can be done. When I've tidied all these 'names' to a standard one, I want to sort the data (sometimes rows, sometimes columns) alphabeticalled for instance by the A1 to A10, or by A1 to Z1. Simply using the sort option loses all the references as is doesnt change any cells linked to that cell. The only way I could think to make keep the other cells pointing to where they should is to cut and paste/each row/column in alphabetical order manually.
I have done the above where when I select a picture name from a drop down list it displays the relevant picture in another cell by using the IF function in the named formula
My question is why cant I use VLOOKUP instead of IF in the named formula. When I use it it comes with an error.
VB: 'enables user to click [U]highlight and select[/U] an item in ListBox1 and ListBox2 item (same row in index) is also [U]highlighted[/U] (highlighted only not selected) Private Sub ListBox1_Click() ListBox2.ListIndex = ListBox1.ListIndex End Sub
Question: Is it also possible to enable a user to click to select an item in ListBox1 and ListBox2 item is also selected simultaneously (same row in index). Is there excel vb code to do this?
I think the code may be along the lines of the ListBox SelectedIndex property. What would be the Excel VB code equivilant for the ListBox SelectedIndex property, if so?
I want to save the Excel file as "Excel Macro-Enabled Workbook." Currently, File Format:=xlNormal within the VBA code and the results saves the Excel file as .xls. How do I write the File Format to save the Excel file as "Excel Macro-Enabled Workbook."
I need some way that can identify when the item in the description column doesnt match the first item of the same number- for example, here the 1-blue and 3-orange would be flagged because they should match the 1-yellow and 3-green.
I need to do this on a much larger scale (approximately 20,000 data points), so I wanted to create a formula or macro that could do this for me.. I thought making a reference page with would work but I keep getting an error.. I haven't done VBA in a while, so I may have syntax errors.
If Range("A2:A9").Sheets("Sheet1") = Range("A2:A6").Sheets("Ref") And Range("B2:B9").Sheets("Sheet1") = Range("B2:B6").Sheets("Ref") Then Range("C2:C9").Sheets("Sheet1") = "x" End If