Visual Basic

ChandraRam25-Jul-08 1:58

25-Jul-08 1:58

Maybe this is what you are looking for...

With ActiveWorkbook.Sheets("SheetName").Buttons.Add(10, 10, 100, 25)
  .OnAction = "FunctionName"
  .Caption = "New Button"
  .Name = "cmdNewButton"
End With

Matthew Leggett25-Jul-08 2:43

Matthew Leggett

25-Jul-08 2:43

Cheers exactly what I needed

I have figured out how to create the button, and place on the screen at the desired location, and I have created the script I want the button to perform.

Brief example of my layout

Private Sub Month_Click()
With ActiveWorkbook.Sheets(SetMonth).Buttons.Add(500, 50, 100, 25)
.OnAction = "FunctionName"
.Caption = "Foreign"
.Name = "cmdNewButton"
End With
End Sub

Sub FunctionName()
Amount1 = Application.InputBox("Enter Amount")
Worksheets(SetMonth).Range("A1").Value Amount1
End Sub

The problem is it won't work, any ideas as to what I am doing wrong?

ChandraRam25-Jul-08 2:50

25-Jul-08 2:50

Is this the exact code you have in your Excel macro? If yes, then you have not assigned Amount1 to Value... I mean, you are missing a "=".

I tried after inserting = and it works for me Smile | :)

Matthew Leggett25-Jul-08 3:10

Matthew Leggett

25-Jul-08 3:10

doesn't for me Sigh | :sigh:

I get a message saying

The macro 'Finance2.xls!FunctionName' cannot be found.

when I click on the button

ChandraRam25-Jul-08 3:23

25-Jul-08 3:23

I had both the button creation code and the FunctionName in a module when I tried it out - maybe that is what is needed.

Connection String Typed Dataset 2005

Matthew Leggett25-Jul-08 3:33

Matthew Leggett

25-Jul-08 3:33

your a star, you was right.

dotnetme223-Jul-08 11:07

dotnetme2

23-Jul-08 11:07

I have serveral databases with same tables and different data... I have a Strongly typed Dataset I set up with the Dataset designer wizard which contains a few Datatables & Tableadapters... but it points to one database... Since I have several databases with the same tables I want to use the same dataset and datatables but let the user pick the Database at run time. I'm not sure if you can change the Connection string at runtime for a Tableadapter..... but that is my question can you change the Connection string at runtime for a Tableadapter of a strongly typed dataset. Confused | :confused:

VB.Net 2005

Thanks in advance

dotnetme2

Re: Connection String Typed Dataset 2005

_Damian S_23-Jul-08 14:42

_Damian S_

23-Jul-08 14:42

You can change the connection string of a tableadapter at runtime by updating the Connection.ConnectionString property.

--------------------------------------------------------
Knowledge is knowing that the tomato is a fruit.
Wisdom is not putting it in fruit salad!!

Re: Connection String Typed Dataset 2005

Jon_Boy24-Jul-08 1:52

Jon_Boy

24-Jul-08 1:52

Changing the tableadapter's connectstring is the easiest way to do it (IE: we send the conn obj to the dal, which then determines connection string to use).

The dataset also has a InitConnection sub which you could modify to change the connect string as well; but if you modify the DS, the partial class may be rebuilt and your source changes lost.

Distribute com-wrapped dll

nlarson1123-Jul-08 8:29

nlarson11

23-Jul-08 8:29

I made a dll that is com-wrapped. How do you distribute that dll and register that dll in the registry? I have created a setup program that does it but is there an alternative to the setup program?

Thanks,
Nathan

'Never argue with an idiot; they'll drag you down to their level and beat you with experience.' ~ anonymous

'Life's real failure is when you do not realize how close you were to success when you gave up.' ~ anonymous

jzonthemtn23-Jul-08 9:02

jzonthemtn

23-Jul-08 9:02

Do you just need to register the dll using regsvr32[^]?

nlarson1123-Jul-08 9:07

nlarson11

23-Jul-08 9:07

Thanks for the reply. No. I tried that and it said there was no-entry point into the dll.

nlarson1123-Jul-08 9:13

nlarson11

23-Jul-08 9:13

i think i found it. there is a tlb file that comes along with the dll. there is an application in the windows directory called regtlib.exe that's how you register the tlb file which will auto-link itself back to the dll.

thanks anyway....

SaveAs Excel sheet without prompt

jzonthemtn23-Jul-08 12:44

jzonthemtn

23-Jul-08 12:44

Ah, thanks for the note. That's worth remembering.

New_Coder23-Jul-08 7:19

New_Coder

23-Jul-08 7:19

Using VB code I am looking for a way to save an Excel sheet without getting a prompt (in Excel asking if I want to overwrite the file) and close the Excel without user intervention.

I have created an Excel.application object (MyExcel), a book object (MyBook) and a sheet object
(MySheet)

Through code I dump my datagrid data to the Excel Sheet, and save the file to disk using
MyBook.SaveAs (save_Path & Save_Name)
MyExcel.activeworkbook.close true

This works great if the file does not exist, but prompts me to overwrite the file if it does.

Any Suggestions would be helpful
D'Oh! | :doh:

Re: SaveAs Excel sheet without prompt

ChandraRam23-Jul-08 7:35

Re: SaveAs Excel sheet without prompt

23-Jul-08 7:35

Two things you can do...
- delete file first, if it already exists
- set DisplayAlerts to False in MyExcel object

HTH

New_Coder23-Jul-08 7:45

New_Coder

23-Jul-08 7:45

Thanks for the advice
"MyCxcel.DisplayAlerts = False" did the trick
Big Grin | :-D

Re: SaveAs Excel sheet without prompt

ChandraRam23-Jul-08 7:58

how to remove the datas automatically in listbox?

23-Jul-08 7:58

New_Coder wrote:
Thanks for the advice
"MyCxcel.DisplayAlerts = False" did the trick

Glad it worked out for you... you are welcome.

Smile | :)

sathyan_829423-Jul-08 6:57

sathyan_8294

23-Jul-08 6:57

hai all,
i am using .net 2005.i do my project in vb.net windows application.i have 2 listbox named as connolistbox and lotnolistbox.
i displayed the lotnos datas automatically in lotnolistbox based on i selected conno in connolistbox.
i want to do like,
if i removed all lotnos from lotnolistbox means that selected conno from connolistbox must be automatically removed.
for example,
i click 'conno101' in connolistbox means the 4 datas are lotno1,lotno2,lotno3,lotno4 are automatically displayed in lotnolistbox.
then i remove 4 datas are lotno1,lotno2,lotno3,lotno4.
now lotnolistbox is clear.when lotnolistbox clear means the 'conno101' must be automatically removed from connolistbox.
if lotnolistbox not clear means the 'conno101' must be there in connolistbox.

Re: how to remove the datas automatically in listbox?

r_mohd23-Jul-08 21:22

r_mohd

23-Jul-08 21:22

he try this <connolistbox.selectedindices.clear()>

rmshah
Developer

Odd question of the day: How to determine the # of rows in a statusstrip control when the layoutstyle = flow?

Jon_Boy23-Jul-08 2:57

Jon_Boy

23-Jul-08 2:57

Is there a way to determine how many rows exist in the statusstrip control when the layout style = flow?

Example: you have a status strip control at the bottom of the form which contains 10 or so status labels. When the form is maximized, the labels look fine. When the form is resized, the status strip adds a second row to push some of the labels down that no longer fit on the first row.

Re: Odd question of the day: How to determine the # of rows in a statusstrip control when the layoutstyle = flow?

Luc Pattyn23-Jul-08 7:09

Luc Pattyn

23-Jul-08 7:09

Hi,

If everything else fails, you could divide the status strip height by the smallest value
it ever had.

Smile | :)

Luc Pattyn [Forum Guidelines] [My Articles]

Voting for dummies? No thanks. Dead | X|

Re: Odd question of the day: How to determine the # of rows in a statusstrip control when the layoutstyle = flow?

Jon_Boy24-Jul-08 1:54

Jon_Boy

24-Jul-08 1:54

"That'll do pig, that'll do." (from Babe the movie).

Thanks for the idea!

VB6 Image Control

Johan Lombaard23-Jul-08 2:49

Johan Lombaard

23-Jul-08 2:49

We have an old VB6 App that displays an image using the image control. The client claims that they could previously right-click on the control and select "Print" (there's no code for that). It's not there anymore.
Does anybody know whether there was functionality built into the control that was maybe removed by a service pack ? Doesn't sound right to me.

Johan Lombaard

Only two things are infinite, the universe and human stupidity, and I'm not sure about the former - Albert Einstein

Re: VB6 Image Control

ChandraRam23-Jul-08 3:08