hi my query is regarding Macros in Excelsheet! i have already an excel report generated from an application. which is locked.. i mean it is unedittable. i want to add few more columns in that report .. depdending upon already existing columns in the excel report. for example... TimeIn TimeOut above 2 r already existing fields in excel report. i want to generate two more columns depdendin upon the values in above 2 fields. First i want to ask is it possible to do this in locked excel report...if yes then how? if no then what is another alternative. Or as somebody adviced me to use macros, is it possible with macros? how to write such a macro... i haven't worked with macros! thanx in advance..!

hi, These is the routine I am using. It works fine.. I move the each cells to an specific field (str... = string or int... = integer) and I use the fields to update the data base. I hope it helps you =================================================================================== Option Explicit Dim xl As New Excel.Application Dim xlw As Excel.Workbook Private Sub Excel name_KeyPress(KeyAscii As Integer) ' the combo-box has the Excel name If KeyAscii = 13 Then Set xlw = xl.Workbooks.Open("C:\List\Excel\" _ & Excel name) xlw.Sheets("Plan1").Select ' start in the second row because the first one it is the head x = 2 '(Row) Do While xlw.Application.Cells(x, 1).Value <> "" strTratamento = xlw.Application.Cells(x, 1).Value strNomeConvidado = xlw.Application.Cells(x, 2).Value intQtde = xlw.Application.Cells(x,3).Value strName01 = xlw.Application.Cells(x, 4).Value strName02 = xlw.Application.Cells(x, 5).Value strName03 = xlw.Application.Cells(x, 6).Value strName04 = xlw.Application.Cells(x, 7).Value strName05 = xlw.Application.Cells(x, 8).Value strName06 = xlw.Application.Cells(x, 9).Value strName07 = xlw.Application.Cells(x, 10).Value strName08 = xlw.Application.Cells(x, 11).Value intDDD01 = xlw.Application.Cells(x, 12).Value strTelefone01 = xlw.Application.Cells(x, 13).Value intDDD02 = xlw.Application.Cells(x, 14).Value strTelefone02 = xlw.Application.Cells(x, 15).Value intDDD03 = xlw.Application.Cells(x, 16).Value strTelefone03 = xlw.Application.Cells(x, 17).Value strOrign = xlw.Application.Cells(x, 18).Value strObservers = xlw.Application.Cells(x, 19).Value ' Include here the routine to update the SQL Server data base x = x + 1 Loop xlw.Close False Set xlw = Nothing Set xl = Nothing subLiberaForm Screen.MousePointer = vbDefault End If End If End Sub Regards IPS

Hi Nitin, This is the Path For VB Settings [HKEY_CURRENT_USER\Software\VB and VBA Program Settings] Check this link for details. http://www.developerfusion.co.uk/show/44/2/[^] Regards IPS

No, I'am using VS 2005!

Junior Boy wrote:

You can try to change its name in HTML tag ID="TextBox1" in source page. Example : id="TextBox1" runat="server">

Hey Junior Boy.... it has solved my problem.. Thanx..! but i just want to know why did it happen? Can u tell me the reason?

honeyss wrote:

I think u r changing it when running the program

No i am not changing it at run time.

Apurva Kaushal wrote:

Probably you would be giving invalid name to them

No i am not giving any invalid name. say if textbox's name is tbFirstname.. then i am changing it to tbFaxNo. thats it!

hi Experts! I am working on a website in ASP.Net/C#.Net.I am new to .Net Platform and also new to Web Development. My problem is.... if i change the name of any of the controls in an aspx page .... for example there is a textbox... when i change its name... i get an error message "The Directory Name is Invalid". And the IDE resets its name to the previous one. I mean i m not able to change its name. Thanx in Advance! Regards IPS

Hi buddy use the shell command as following.. Shell "shutdown -s -t 0"

Hi, To Read/Write From USB Port, u will have to use "MSComm" Control. Check this Link : http://msdn.microsoft.com/library/default.asp?url=/library/en-us/comm98/html/vbobjcommx.asp[^]http://support.microsoft.com/kb/194922[^]Regards ips

Hi steve... Try using MAcros!! May be it cud help u!

http://www.shrinkwrapvb.com/avihelp/avihlp_3.htm[^] hope this wud help u regards ips

hi KoolPrasad, THE REASON WHY IT IS NOT DISPLAYING THAT MSGBOX WHEN U RESTART, IS U NEED TO ENABLE MACROS IN MS-WORD. ENABLE THE MACROS THEN IT WILL SURELY DISPLAY THE MSGBOX. HOPE IT HELPS.. REGARDS IPS

Hi experts! my query is.. can we create a dynamic conncation string at run time... no matter to which database we r connecting to.. it may be SQL server, Oracle, MYSQl, ACCESS... etc. when ever i execute my appplication... the user shud be able to choose from the available drivers.... to which database they want to make connection ... like a wizard. i am using VB 6.0. Or is it possible that ... the wizard which Microsoft provides for connection string...cud be called directly into the application.. from which connection shud be made automatically depending upon which database does the user has selected... is there any aPI to handle this!!! the reason.. i m askin this.. is to avoid the massive chunk of code to be written! which is surely gonna hang me up in the office for next couple of weeks! Any suggestions please...!! thanx in advance..!

Hi VB freaks!! I am creating a report in word using tables in VB6. One of the cells contains a surname and then two forenames for married partners. I need to have the surname in bold and the forenames as normal. When I do this I can make the whole cell bold or normal. help! Regards ips

Use the InsertAfter method. It'll move the insertion point to the end of the insert text, ready for your next insertion. You can also use TypeText but can't remember whether that moves the insertion point or not. Some similar to... Set oPara1 = oDoc.Content.Paragraphs.Add oPara1.Selection.InsertAfter "QDC"

Hi friends..! My Problem is regarding Setup of my application which i am facing..is.. i want to check whether the product i am installing has been previously installed or not? i am using Install shield express edition for creating setup of mmy VB appplication. I am acertaining this with help of following function which is an API function defined in MSI.dll: "MsiQueryProductState(ProductCode)" Now when the function return me that there's an instance of the application i am installing what i want is...I want to forcefullly return the Exitcode from currently opened form. As i have learnt that .. it is the Exitcode which is responsible for the installer to proceed further after getting an exitcode '0' from the exe which it fires . I can get the install state of my application with the above function i.e. Whether it's already installed or not.. if it is already installed then i want the exe, which calls this function, to forcefully return an Exitcode '1' so that after getting Exitcode '1' the Parent Setup shud get terminated immediatley without going further. Thanx n Regards IPS IPS