Over the weekend I did some edits to an Excel file on my home computer. This morning I did some edits to the file on my work computer. When I try to access the VBA code, I get the message "Error in loading DLL", which is error 48.
View 12 Replies
Over the weekend I did some edits to an Excel file on my home computer. This morning I did some edits to the file on my work computer. When I try to access the VBA code, I get the message "Error in loading DLL", which is error 48.
View 10 Replies View RelatedRuntime error 1004 while loading Add-In. I have a workopen event as follows:
View 4 Replies View RelatedI'm trying to automate Disk Cleanup, Defrag and Backup via VBA but can't seem to get defrag to work...
Sub defrag_hard_drive()
Dim returnvalue
'exe file shell
[Code]....
How to get a listbox to populate from a database sheet the code I am using to do this is posted here and it works great. My problem is now I want to get the Listbox1 results to populate my UserForm5 textboxes from the row selected in the ListBox1 of Userform4, but I am getting the error "variable not defined" and the "rw" gets highlighted. as seen in the code below it.
UserForm4 portion of the code that does the search of the sheet that holds the data
Code:
Private Sub CommandButton1_Click()
Dim sFindText As String, sFirstAddr As String
Dim i As Long, lFindCol As Long, lCol As Long, lRow As Long
Dim rMyData As Range, rMySearchField As Range, cFound As Range
Dim vArray() As Variant
[Code] ......
Userform5 issue is this rw in red doesn't seam to be right
Code:
Private Sub UserForm_Initialize()
TextBox1.Value = SrcWks.Range(UserForm4.ListBox1.List(rw, 0)).Offset(0, 0) '
TextBox2.Value = SrcWks.Range(UserForm4.ListBox1.List(rw, 0)).Offset(0, 1) '
TextBox3.Value = SrcWks.Range(UserForm4.ListBox1.List(rw, 0)).Offset(0, 2)
TextBox5.Value = SrcWks.Range(UserForm4.ListBox1.List(rw, 0)).Offset(0, 3)
[Code] .........
i have a macro he was working good but now i got a box labeled "Microsoft Visual Basic" saying "Error in loading DLL" and the macro won't open. I can't figure out what I'm missing.
View 9 Replies View RelatedIntermittent run-time error '75'
Could not find the specified object.
Debug shows VBA Code that simply loads a form called controls
Sub loadcontrols()
Load Controls
Controls.Show
End Sub
Generally works upon restart. Can load and unload the form numerous times. Seems loading the form after a few minutes results in the form failing to load generating the error. Found no consistent cause thus far.
Results in a hard crash: Restart Excel as only option.
The Form Code for Controls loads a modeless transaprent form. Has been working for months. Don't know if this error is new or has been there all along.
Option Explicit
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function DrawMenuBar Lib "user32" (ByVal hWnd As Long) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Function ReleaseCapture Lib "user32" () As Long
Private Const GWL_STYLE As Long = (-16)
Private wHandle As Long 'For moving the form
Private m_objCFormSkin As CFormSkin 'For transparancy
I had been working on some code for about 30 minutes and all of a sudden I am getting an "Error in Loading DLL" message. I can't figure out what I was doing that would have made this error occur. It appears that other workbooks with macros are working correctly. In advice as to what I may have done incorrectly to cause this error and how I might fix it?
View 6 Replies View RelatedI am not sure whether it can show a loading gif in the front when it executes the vba, after the executions , the loading gif will desappear.
for example here is a loading gif :
[url]
I am loading my UF combo box based on data in one of my sheets. I want in a way that if I keep adding to my data sheet, it would add with it.
For some reason it is not loading as I wanted to. I have tried as module and as UF code. Again, for some reason it is not loading.
Here is my code
I'm trying to load an array with numbers from 3 to SheetCount. If someone wouldn't mind giving me a nudge in the right dirrection, it'd be appreciated.
I have created a Excel userform. Since it has lot of controls, it takes good amount of time to load.
Is there a possibility of displaying a progress bar till the userform is loaded.
Google search has shown me ways to create a progress bar using Excel Forms. However, I am looking for a way to show the progress bar till the main userform is loaded.
I'm trying to achieve: -
I want to create a spreadsheet which will include a column with email addresses in it.
Here's my problem.......
I want users to be able to click on an email address (like a hyperlink) and by doing this open their mail client (in this case Microsoft Outlook) and send an email. I would like the mail client to load a specific template just by clicking on the link from Excel. I'm not sure if this is possible, but there doesn't seem to be many things you can't do on Excel.
The form is not uploading my dropdown box. I know I am missing something in the code, but I am not sure what.
View 4 Replies View RelatedI have a list of accounts that is constantly changing(could be anywhere from 50-7500) and on that same sheet I have a count formula that will count all the accounts. This sheet is not going to be visible to the user.
On another sheet, I have a form that pops up with some data entery. What I am trying to do is when the form pops up, for the number of accounts to show up in a text box. If anyone could help me with the VBA code id appreciate it. The worksheet name is "Accounts", the cell is T17, and the textbox name is just TextBox1.
I have ten customers who have multiple locations where we do work. On ourinvoice I want to use Data Validation (list option) to read the input "CustomerName", and then change the validation list in the "Job Reference" cell accordingly. For example if A1 is the customer name and A2is the "Reference" where the data validation list will be. Customer ABC has 3 locations, XYZ has 5, CompanyD has 4, and so on. The range for thevalidation array is C1:C5. ABC's list oflocations is located at A10:A15, that of XYZ at A16:A20, and Company D atA21:A25 (and so on, for the others). Howcan I load the data validation range (C1:C5) with the correct list from, forexample A16:20 based on A1 being customer XYZ?
View 1 Replies View RelatedI am using the following Macro to load a selected sheet:
Application.Dialogs(xlDialogOpen).Show
Windows("Prototype Worksheet.xls").Activate
Windows("Test Data.xls").Activate
Range("A1:U102").Select
Selection.Copy
Windows("Prototype Worksheet.xls").Activate
Range("A1").Select
ActiveSheet.Paste
Range("A1").Select
Windows("Test Data.xls").Activate
Application.CutCopyMode = False
ActiveWindow.Close
This works fine as long as I load the file named Test Data, lolz, but on the line"Application.Dialogs(xlDialogOpen).Show", I actually select the file to be loaded. how can and what should I change on the line "Windows("Test Data.xls").Activate" to achieve this
and also
at the very end of the macro I want to close the loaded file without the save box coming up.
I have a dropdown box with a few options in it. What I want to do, is have excel load a particular picture, that I have saved on my computer, into the background when a certain option is selected from the dropdown box.
View 9 Replies View RelatedI am trying to distribute an app that uses MSCAL Control. I am including the MSCAL.ocx file in the setup file and it saves it to a dierectory. However, when the app runs it will not load the activex Control (MSCAL)
Application.VBE.ActiveVBProject.References.AddFromFile("c:Program FileBM ApplicationMSCAL.OCX")
I hope there's someone who's familiar with Bloomberg in this forum.
My problem is, I have a template which conducts checks with data extracted a Bloomberg Terminal. I want to ensure that all data has FULLY loaded before I execute the checks.
So is there a way to detect if data is still loading?
Like for example, I need data to load from A1:A100, but data has only populated until A50. In this case I need to know that the other 50 cells are still populating.
I've created a sheet to estimate a job project and now I am working on a new sheet to keep track of our estimated totals compared with actual expenses.
What I need is to make a macro that allows you to browse the PC and let the user select the excel sheet where all the Estimate Values are stored. These stored values are pulled up and posted onto the new workbook.
Please pull A1 from the estimate book and put it in B4 of the new workbook
I am using the GetSaveAsFilename function to save a file. I have the filefilter as "Excel Add-In (*.xla),xla", however when I save a file this way as an add-in, then try to load that add-in, I get the following error message.
'C:Documents and SettingsUser1DesktopBook3.xla' is not a valid add-in.
Does this mean that the GetSaveAsFilename is not capable of saving a valid xla file?
I have created the attached spread sheet to work out and calculate gp on products. Sheets and userform1 are working perfectly how ever userform2 wont load and I believe its something to do with the named range? The idea for this userform was to select a product from combobox1 and then change the price on sheet1 and clear the price on sheet 2 in the different sizes.
Also userform2 i would like to create it so that if any of the fields are left blank it wont change price of selected field in sheet 1 and wont clear selected area in sheet 2.
Finally is there a way on userform1 to shrink the userform size depending on how many sizes are needed?
Attached File : NEW GP CALCULATOR.xlsm
I have in a user form 2 combo boxes. In one of my sheets I have the data that I want to be loaded in the combobox depending on the other combobox. In other words if combobox1 = white, then combobox2 needs to have the following items to be picked from "large", "medium", "small". If combobox1 = "blue" then I combobox2 needs to have another 4 items and so on. I have about 8 different options in combobox1.
What code could I use on that?
Also in that same project, I have a spreadsheet that has all my data; such as a inventory. How can I do, when I pick the SKU# to load the other fields, such as Description, qty on hand, price, etc?
I have a userform, when it first comes up, then there are some text boxes that needs to be filled. I have the "ok" button which opens another form. What would be the code for whatever was filled in the text box be pasted in a cell? In other words, once it is ok is clicked another form pops up and then whatever info was put in the text boxes is pasted in a report.
View 4 Replies View RelatedIs it possible to load non-consecutive columns from a worksheet into an array? This works fine for 1 column:
View 2 Replies View RelatedI made a template file with a userform included to enter data into a protected sheet at the command of a button. When I open the template, everything works fine. However, when I use a macro to create a new workbook and import the template to create a new sheet (or several) the userform suddenly disappears! The template is saved as macro-enabled and the new workbook is saved the same way. What am I missing that I'm loosing the userform??
View 9 Replies View RelatedI have a project which has several forms in it. I want to load them all and interrogate the controls on them. I can so this using the form name directly:
Load MyEntryForm
for each c in MyEntryForm.Controls
activecell.value = c.name
next c
However, I do not want to repeat this code for every form. Is there some way of doing similar to the following so that it will automatically interrogate all forms in the project:
For each MyForm in MyProject
Load MyForm
for each c in MyForm.Controls
activecell.value = c.name
activecell.offset(1,0).select
next c
Unload MyForm
next MyForm
I'm just trying to figure out how to implment UDFs. I got a nice tool that provides linear interpolation for a data table. Unfortunately after saving, closing and opening the file the cells only show #NAME? in it. Do I have to activate macros or something like that?
View 9 Replies View RelatedI have created a userform which is initiated off a button in her spreadsheet, where if she enters an order number, it will display the values from the row containing that order number. I have made it so she can load from the excel sheet the values into textboxes, where she can change values then save them back into the excel sheet.
I have also include the ability to insert a new row at the end for a new order.
Everything works fine except the date values and I'm a bit stumped, I have searched but can't find anything that helps (I thought DateSerial helped but it didn't).
I've had two problems. the first was that the day and month swapped, I could load 1st Mar 2007 from the excel sheet and when stored back it changed to 3rd Jan 2007. This I presume to be due to US and UK date formats, I am in the UK.
I thought I had fixed this by changing:
oDisplay.Value = vStoreArea .............................
