One of my workbooks won't allow me to use the VBE variable types (VBProject, VBComponent, etc.) They aren't on the popup list that appears when I type " as ". If I just type in "VBProject", I get a compile error "User-defined type not defined". I have to define the variable as object, and the macro still works. I do not have this problem in any other workbook.
View 3 RepliesWhenever aiming to open, copy, or delete files, the following VBA code is rather a must
Dim SOMETHING
Set SOMETHING = CreateObject("Scripting.FileSystemObject")
in that we may then continue with either
SOMETHING.CopyFile (source), destination, True
or
SOMETHING.DeleteFile what_to_delete, True
etc, etc
The question: which type a variable is SOMETHING from above? Furthermore, could anybody please help me to understand why never seen in literature a complete declaration such as
Dim SOMETHING As what_type?
I am currently working in an application in which I use the following user defined types:
Public Type correlationstruct
corr As Variant
corrstd As Variant
lower As Variant
upper As Variant
support As Variant
End Type
I have a public variable called myctafund, of type ctafund:
Public myctafund As ctafund
My problem is the following: When I need to update myctafund, I first want to clean it entirely before putting new values, so as to be sure older values do not stick around (I do not necessarily overwrite all the values of the mycta type).I can't figure out a way of clearing the entire myctafund variable in one shot. I tried:
myctafund=empty
but I am granted by a nasty excel error. I'd like to avoid writing 200 lines of code just to clean the entire variable.
Here's what I'm doing: I'm using a macro to assign a cell value to a variable then set another cell value to the variable instead of copy/paste (because even pasting values only was affecting other formulas in the file for some reason)
The problem: in using the macro, the number being 'copied' is acquiring a few extra decimal places IE 38334.61 is the original number and 38334.609375 is what I end up with. The numbers come from a CSV with only 2 decimal places and I checked by adding decimal places in the format so it's not a formatting/visible digits issue. Since the values are hour meter readings, the extra decimal places end up with very small values outside 0-24 hrs which messes with sorting and usage %. The values are so small all of them together in a month add up to a fraction of a cent but it's one of those things that bugs my OCD by not being right.
My VBA book explains the min/max capabilities, content type, memory bits but not fiddly details like this.
So my question is this: right now I'm declaring the clipboard-substitue variable as an single, is there a different one that would work better without adding anything? Criteria are: numeric, 6 digits before the decimal, 2 after, all positive values. (Ie 123456.12)
EDIT: fixed my senior moment.
I have the following codes in my spreadsheet, they are pretty much the same and both used to work perfectly. However, now the first code returns a Type Mismatch '13' on line beginning mynum= and the second one works perfectly.
Sub addtasks()
Application.DisplayAlerts = False
myrow = Cells. Find(" Total P&C Estimate").Row - 3
mycell = Cells(myrow, 2)
mynum = Right(mycell, Len(mycell) - InStr(mycell, "#")) + 1
With Range(Cells(myrow, 2), Cells(myrow + 2, 2))
.EntireRow.Copy
.EntireRow.insert Shift:=xlDown
End With
Application.CutCopyMode = False
Cells(myrow + 3, 2) = "Task#" & mynum
Application.DisplayAlerts = True
End Sub
How to assign a variable of type Long to the below code.
1) Dim searchField as LOng
ActiveSheet.Range("N2").FormulaArray = "=MAX(IF($A$2:$A$200=""" & searchField & """,$C$2:C$200))"
2) ActiveSheet.Range("N2").FormulaArray = "=MAX(IF($A$2:$A$200= searchField,$C$2:C$200))"
1) code failed because I want the variable searchField to have a data type of LONG.
2) code failed because it seems like excel thought the search criteria is of same searchField.
How to convert date to general format and store it in a variable of data type Long. I.E if I convert 3/15/2008(data type of Date) to data type of General, it should be 39522. What is the VBA code for doing this conversion?
I have declared a 'long' variable. however; how do I change the variable data type to string if user input is not a number? how do I recognize the user input's datatype?
View 7 Replies View RelatedI have a formula
{=IF(OR(D9=M4:S99),"m")}
For instance
This formula works
But when i click in the cell to edit the formula the {} (at the beginning and end) disapear and the formula no longer works.
If i add them back manually the formula still does not work.
How can i edit these formulas without stopping them working.
I have a formula in C5 = IF(C$1=$A$2,($J$3-B$4)/COUNTA(C$1:$J$1),"") the problem is, when I will copy the formula in C5 and paste it to D5, E5, F5, G5, H5, I5 & J5 respectively, the value will disappear. What should be my formula in order not to disappear the value?
ABCDEFGHIJ108-Mar-0915-Mar-0922-Mar-0929-Mar-0905-Apr-0912-Apr-0919-Apr-0926-Apr-0903-May-09208-Mar-0914-Mar-0921-Mar-0928-Mar-0904-Apr-0911-Apr-0918-Apr-0925-Apr-0902-May-0909-May-093Planned Cumulative1204Actual Cumulative15Remaining Qty. per Wk14.88
I have an excel document that looks all nice and pretty except for the little white grids all over it with unused cells. Is there anyway to hide the lines? i dont care that the cells are there just the lines make the form look kinda crappy.
View 4 Replies View RelatedIs it possible in a Label caption to be visibile in a second?
I just want, when the user hit the commandbutton1, a label will be visible in a second and then disappear again after 1 second.
before i run my macro, i would like a msg box that appears that says "please wait, this may take a while". I've tried using the msgbox function but unless the user presses the "OK" button on it, the macro won't run....
any suggestions on how i can have a userform/msgbox appear while the macro is working in the background (without the user having to press "ok")
I think I asked this in a much more complicated & confusing way before; hoping this makes more sense. I'd like to set something up so that when a name is entered in ColA of sheet1, it disappears from a list of names in ColA of sheet 2.
View 9 Replies View RelatedIs there a macro that can make cells with no data in them disappear or not be displayed?
View 9 Replies View RelatedIn recent weeks, when I've been asked to demonstrate excel applications which make use of buttons, I've found that on some machines the buttons will variably display as flat grey rectangles with no label, or boxes with red 'x's, or alternatively not appear at all. There seems to be no pattern since the variations have all happened on single machines, then not at all on similar machines.
So far it has only been company laptops (not my own machine), hooked up to overhead projectors which end up with this problem. I can't think of anything I would have done manually to disable the buttons from appearing.
Is this a known issue, or is this simply down to the user preferences and/or security settings?
Why after the first loop (Z=2) all of a sudden column A in WS ATT disappears. Worth adding that column M in WS L is a "dynamic" range (at first it contains 7 cells) in the sense that it shrinks with each loop (M2:M8, second loop: M2:M7 etc.).
[Code] .....
I have a worksheet (in a workbook with many worksheets) where some of the cells display the formula I put in after I leave the cell. I've made sure that the cell format is General before I type anything in the cell. I've inserted new rows, above where the problem is and have tried going to another cell in a different part of the work sheet but I have the same problem. I use the same formulas in two other worksheets. The formulas include other worksheets in them. example =IF(PlotMaster!B2="","",PlotMaster!B2). I can't figure out what is going on.
View 1 Replies View RelatedI've created some code so that when users want to update something on and Excel template I'm creating for them that the information they've put in is backed up. They give the backup a name using an inputbox and it loops through previously loaded backups that I've stored in a separate sheet and checks if the backup already exists. If it does a msgbox appears to ask them if they want to replace the existing copy. If they choose not to, it re-opens the inputbox.
The issue I'm having is that the msgbox doesn't close before the input box opens and it looks messy and may be confusing. Is there any way, without creating a useform, that I can force the msgbox to close once the user has made a choice before the inputbox opens?
Here is the code:
Code:
1
BackName = InputBox("Give the backup a name", "Backup Name")
If BackName = "" Then GoTo 2
For i = 1 To LR1
If UCase(Sheet18.Cells(i, 1).Value) = UCase(BackName) Then
If MsgBox("Backup already exists. Replace?", vbYesNo) = vbYes Then
[Code] ......
I created a macro that prints a label from a userform. The macro used to reside on an XP platform and performed without issues. IT decided they wanted to upgrade the machine to a Windows 7 platform. Now when the userform prints a small window pops up that looks like a print preview of the label, however it is transparent and has a window caption of 'Precut Label' as identified in the userform design. I am including a screenshot of the pop-up. The unusual thing about this is the window cannot be closed, moved or selected in any way shape or form. The only way to get it to close is to view the userform object in the vba editor. The line of code that triggers the print sequence as well as cause the pop-up is: frmLabel.PrintForm. This line of code is housed in the sheet1 object.
View 1 Replies View RelatedI have two option buttons. I would like to have a command button disappear if one option is filled and reappear when the other option is filled. What is the best way to do this?
View 9 Replies View RelatedI have got this in a pivot table
Customer Total sales(USD)
30010 500.00
30041 2000.00
In another column I enter a comment for customer 30010(and leave the comment column for customer 30041 blank) as below
Data 1.xls
Customer Total sales(USD) Comment
30010 500.00 Test 1
30041 2000.00
Later on the content of the file changes as below:
Customer Total sales(USD)
30025 1500.00
30010 500.00
30041 2000.00
When the file is refreshed I would like to have comment as per the former file i.e the comment “Test 1” should appear against customer 30010 and similarly for any other customer that I enter the comment.It should be as below:
Customer Total sales(USD) Comment
30025 1500.00
30010 500.00 Test 1
Customer Total sales(USD) Comment
30041 2000.00
1. Is there a VBA Function equivalent to the FIND() function, If so What is it?
2. Let's say Im Putting a Date into a inputbox, what is the type # for date (Type:=?)??
I sometimes import data in the copy-paste way from completely different sources, eg. a program on the web or whatever, which has arranged the data in a table.
It is often succesful with the data neatly arranged in the spreadsheet in columns and rows and all, but sometimes the gridlines disappear even though 'cell format' is set to 'none' in 'grid lines' and the settings have a mark for 'visible grid lines' and their color is 'automatic'. Only the imported area misses the gridlines.
It is of course possible to set some grey gridlines manually in cell format, but then I get them on the print also and I don't want that.
I run a football sweepstake involving 120 people. Each week everyone picks a premiership team who they think is going to win. If that team loses or draws they are out. This carries on until there is one person left and they win the money. I need to make a table with all the premiership teams and names down the x and y axis. When the team is marked as "lose" everyone who has chosen that team gets deleted.
View 5 Replies View Relatedcreating a template for people. In the template, I want to create cells which instruct the user on what need to be filled in that cell.
For eg. go to [URL] In the box, it says 'Enter word or phrase'. When you click to enter a word, this line vanishes. I want to create a similar thing in Excel.
In Excel, for eg, in a cell it should say 'Enter Name' and when the user enter his name, this instruction should vanish. Also, this instruction should be in GREY and when they user enters his name it should be BOLD BLUE.
I'm using excel 2010. I have a spreadsheet with a row that is hidden. One cell in this row contains a button. I have a macro that copies this hidden row, inserts it at another point on the spreadsheet and unhides it. It works great in excel 2007, but the button on the hidden row disappears when I close the sheet and re-open it.
View 7 Replies View Relatedmy sheet tabs sometimes disappears when I open excel. I know you can go through the start button and the advanced option to display the sheet tabs. Is there code I can incorporate so that on the opening of the excel file after the splash screen runs its course, the sheet tabs are displayed.
View 9 Replies View RelatedI have a file sheet named "ratio summary." The data to this is linked to a number of different working sheets (not in the attachment for obvious reasons)
Currently the data in the ratio summary is grouped by year but "open" and the Graph worksheet is automatically linked to the data in row11.
However when I group the data by year (i.e. clicking the "-" figure) the graph also changes.
I haven't deleted the data so don't understand why the graph data is changing.
excel graph help.xls
I have a workbook with multiple sheets. I would like to protect both the structure and window, but when I do this the sheet tabs are no longer visible when I reopen the workbook.
View 4 Replies View Relatedby using radio buttons or checkbox, or anything similar. Based on the answer, I would like cells to appear below the question, for example in B3 another question would be "how many guests would you like to invite?" and B2 would be their answer but is preset to "0"
View 3 Replies View Related