|
Ok, i have an excel report with two columns. I would like to build a program that searches for the value in the first column, returns the value in the second column next to the value searched. At the same time, I would like the value of the first and second column recorded into a .txt file and saved to a place of my choosing. I don't need to update the excel file, it's just a reference. Basically, search for x, return y (which is right next to x), and add up the values of all y1...2...3 and save to this report. Is this possible with a macro, and if not, can anyone suggest where to start with a VB program, as I haven't worked in VB in 6 years. I am working with Visual Basic Express 2008. Any help is supremely appreciated.
|
|
|
|
|
This can be done entirely in VBA inside Excel. You may want to start by reading up on the LOOKUP functions in Excel. They'll handle the searching for values and returning the value in the next column.
After that, lookup the File I/O functions in VBA, Open, Print, Close, ...
|
|
|
|
|
Hi
i want to use an dll that have def file on vc++ and lib file that i cannot use it directly in vb in refrence , please help me to use it in VB in other ways.
i can send you the files if you needed.
Thank you for attentions
Best regards
|
|
|
|
|
If the .DLL is COM-based, then you can set a reference to it. Since you can't, you have to manually write Declare statements that import the functions from your .DLL. This is called "P/Invoke". An example of this would be:
Private Declare Auto Function ShellAbout Lib "shell32.dll" ( _
ByVal hWnd As IntPtr, ByVal szApp As String, _
ByVal szOtherStuff As String, ByVal hIcon As IntPtr) _
As Integer
What you put in this statement depends on the functions you want to import and the parameters those functions take.
You can read up more about it here[^].
The .lib file is useless to you in VB.NET.
|
|
|
|
|
Hi,
As part of a short-term project to speed up a clients model, I have taken a financal model written in VBA and put it into VB, which I've compiled. However, the compiled VB model runs a little slower than the VBA. I had expected to get some speed gains, but not to have something that runs more slowly!
Does anyone have any idea why this might be the case or pointers on how I might identify the problems? Searching on Google and Microsoft haven't thrown up any answers.
Thanks,
John.
|
|
|
|
|
There's no way to tell without knowing anything about your code, what it's doing, where the slowdown is, ...
Overall, the compiled VB6 executable should be faster than VBA, but that depends on a lot of things...
|
|
|
|
|
Hi Dave,
The code is a large financial model. It uses multiple classes and reads/writes to SQL server 2000 DB at the start and end.
In short, the vast majority of the code is math operations - mostly fairly simple ones. There are also quite a lot of arrays which are read/written to. Both models use the same range of COM objects for further functionality.
Can you outline some of the more common issues resulting in slower compiled VB6 code?
Many thanks,
John.
Dave Kreskowiak wrote: There's no way to tell without knowing anything about your code, what it's doing, where the slowdown is, ...
Overall, the compiled VB6 executable should be faster than VBA, but that depends on a lot of things...
|
|
|
|
|
jgrogan wrote: Can you outline some of the more common issues resulting in slower compiled VB6 code?
You mean some of the millions of possibilities??
Seriously, it comes down to the quality of the code and exactly what it's doing. You also might have too much in the way of expectations on how fast the code should run compared to the VBA version. You might get 25% out of the VB6 version, if you're lucky. There are sections that will run faster, but this is limited to stuff that does NOT include database access, math operations, and COM objects, interprocess communication, among others. VBA isn't interpreted as much as you may think. It still gets compiled, but on a method by method basis when it's needed.
|
|
|
|
|
Unless specific server takes to defaul the Windows registry?
Fulvio
|
|
|
|
|
Your question still doesn't make any sense at all. You might want to have someone else convert your Italian question into English so we can understand it.
|
|
|
|
|
If i don't put the server name in smtp.server
take the default server of user ???
|
|
|
|
|
There is no "default server". If you don't tell it the SMTP server to use, your message doesn't get sent.
|
|
|
|
|
Member 1996543 wrote: take the default server of user
No. Rather the CLR would resort to its default behavior when something goes wrong. That is:
"Throwing an exception to the user".
Vasudevan Deepak Kumar
Personal Homepage
Tech Gossips
A pessimist sees only the dark side of the clouds, and mopes; a philosopher sees both sides, and shrugs; an optimist doesn't see the clouds at all - he's walking on them. --Leonard Louis Levinson
|
|
|
|
|
Hi,
I have a small problem with folder deletion from a VB application.
It's a bit long, so bare with me.
I have a form that upon its initialization a folder is created using MkDir.
When the form unloads, in its Terminate event the folder is being deleted using RmDir.
in between, temporary files are written in to the folder, and deleted from it.
My problematic scenario is this:
1. the folder is created.
2. files are written.
3. files are deleted.
and here is where the problem starts:
on one computer (debug computer), the RmDir throws an exception of access denied, because a process is locking the folder, but I ignore this error, and when I load the form again, I ignore the error the MkDir throws, and everything seems to work fine (except for the fact that the folder isn't deleted).
on another computer (which also happens to be the QA, and thus really important), again the folder is not deleted (I don't know if there is an error or not - can't debug), but it is also not accessible anymore. Since it is not accessible, when I re-load the form and try to create the folder again, I get an error. The folder is in limbo. when i close the application (and its process dies) the folder is deleted.
my two main goals are
a) figure out why the computers are behaving differently
b) figure out a way to find out what locks the folder, and release the lock.
The only workaround we found, was not to create the same folder each time , but that requires a lot of code changes to VB code as well as C code, as well as not prevent accumulation of temporary folders in my system, both of which I would like to avoid.
Any help would be amazing.
Thanks. 
P.S. - in case it was not clear - this is VB6 code.
|
|
|
|
|
soporificeffect wrote: the RmDir throws an exception of access denied, because a process is locking the folder, but I ignore this error
Do you have a command prompt open or a DOS-based app running with this folder as the current directory?? A Windows process cannot "lock" the folder itself, only the files in it. If there is a file in that folder that is open, you cannot remove the folder that contains it, be it a DOS or Windows process.
Is the folder empty when you try and RmDir it?? There can be no files in it when you do this.
Do you have a virus scanner running, indexing service, or something else going on "behind the scenes"?? Disable it and try your app again.
modified on Tuesday, December 04, 2007 2:11:25 PM
|
|
|
|
|
I delete all the files before I try to remove the folder. the folder is empty.
there are no applications using this folder.
I'm not sure what services run in the background, but it is not possible to disable them.
All this also does not explain how on the second computer the folder ends up in "Limbo", I can see it in the windows explorer, but I can't access it, it's as if the RmDir hasn't finished running, because the second the app closes the folder is gone
|
|
|
|
|
Is there a way to verify what the "Date Modified" date is for a document in Windows? I want to import a report, but I don't want to import it if it bombed overnight so I want to make sure the Date Modified is today's date. Any ideas?
|
|
|
|
|
You can try using the DateLastModified property of the File object(FileSystemObject).
|
|
|
|
|
Dim fi As New System.IO.FileInfo("C:\myfile.txt")
MessageBox.Show(fi.LastWriteTime.ToString("dd/MM/yyyy"))
Daniel Minnaar
Lead Software Developer
|
|
|
|
|
I could not find a VBA forum on here so figure this is the closest forum.
I have an excel doucment, here is kinda what I want to do:
- I have a value entered from an input box (Y), i want to
- If Column A (X (would start at 1)) contains (Y) then Highlight (or select whatever it is)
- Make x + 1 to go onto the next row to check
- Loop until end to ensure all records are checked
- Copy the selected files (already sorted this bit)
This is probably really simple but im new to VBA, help!
Cheers
|
|
|
|
|
Hello!
I have a Form containing a Panel. This Panel contains 3 RichTextBox Controls with some RTF Text in them. My task is to print the contents of RTB at the location with respect to location of RTB.
Following code helps for printing the contents of a RTB on whole paper but is not helpfull in my situation.
http://support.microsoft.com/default.aspx?scid=kb;en-us;811401[^]
Does anybody have some idea how can i implement this.
Thanks in advance for Any help.
colgateas900197
|
|
|
|
|
Have you tried something like this[^]?
|
|
|
|
|
Yes indeed - the MCL Form Print Control[^] (artcile and VB.Net code on this site) can do just that....
Drop the component on your target form and it will add a number of extended properties to each control on that form. Use these to set whereabouts on the printed page you want the RTF boxes to print and any border or background colours etc. and then call its Print() method.
|
|
|
|
|
thanks it helped.....
infact it solved. 
colgateas900197
|
|
|
|
|
Oops - I found a bug...if you preview a form twice or preview then print it th eRTF box doesn't show.
To fix it, alter the "NewLogicalPage" sub in the RTFControlPrintSetting class to clear down the _CurrentChar variable thus:-
#Region "NewLogicalPage"
Public Overrides Sub NewLogicalPage()
If _RichTextBoxPrintMethod = RichTextBoxPrintMethods.PlainText Then
With Me.RichTextBoxControl
_CurrentLine = 0
_Lines = .Lines
_TotalLines = _Lines.Length
End With
Else
_CurrentChar = 0
_TotalChars = Me.RichTextBoxControl.TextLength
End If
End Sub
#End Region
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
