Answer Questions

• Claudiu Chiorean Pull data from .csv files into one main .csv file

  Hi all, Does anyone know how to pull data from specific columns from specific .csv files into one main .csv files / Help appreciated, thanks. Sure. Here's a quick piece of code that demonstrates grabbing data from a CSV file using the row and column number: Option Explicit Option Base 0 Public Sub Main() Dim fptr As Long, fnum As Integer fnum = FreeFile() Open "C:\temp\Book1.csv" For Input As fnum MsgBox GetDataFromCSV(fnum, 1, 2) Close fnum End Sub ' 1-based row/col parameters Private Function GetDataFromCSV(tFileNum As Integer, tRowNum As Integer, tColNum As Integer) Dim ll As Long, tInStr As String For ll = 1 To tRowNum Line Input #tFileNum, tInStr If ...Show All

• Steve Jensen CreateProcessA problem - no DOS windows appearing

  Hi I have an Excel model which (once a lot of data is entered) saves some data as a text file and uploads it to an OLAP database. It does this using CreateProcessA to run a command line. (Code at the bottom of this message.) The code wasn't written by me, but comments on the code say it was from the MS web site. This has worked fine in the past, but I have recently upgrated from Windows 2000 to XP (and from Office 2000 to 2003) and it no longer works. The CreateProcessA command fails to open a DOS window. I thought it was an XP problem, but a colleage has the same set up as me and the upload works fine on his PC. So I think the code's OK, but it seems there's something on my PC that's interfering with it. Any ideas where I can start to loo ...Show All

• DQM iexplore.exe - Application Error

  I get the following error message when I close my internet explorer. The instruction at "0x62304320" referenced memory at "0x62304320", The memory could not be "read". Click on OK to terminate that program. Any ideas what is causing this Hello bennett1016, You are probably experiencing this error due to an ActiveX control on a web page that you are visiting. Essentialy what the message states is that the instruction at the executing address (here its at 0x62304320) tried to read from the same memory block that is currently executing. In basic terms it tried to read 2x at the exact same moment on the same location which cannot be done. I would contact the si ...Show All

• Jörg Riedmiller Closing desktop opened word wants to close embedded word object

  I have an Access program that I am using to build Word documents. If while the document is being built (which can be lengthy) I open Word on the desktop and then close it, Word asks me if I want to save the doc that is being built by the program. Of course if I say yes/no then the program gets the rug pulled out form underneath it. I can say cancel and things will go on their merry way but then there is this blank Word sitting there. This is going to confuse the user. I thought that I was creating a separate instance of Word programatically but apparently not. Is there a way to prevent the desktop Word from bothering the embedded object. Here is a code snippt Dim adoc as object dim wdobj as word.document set adoc = CreateObj ...Show All

• martok open a workbook with events turned off

  Is there a way to open a workbook with the events disabled   In other words, I would like to open a workbook so that links can be updated, but without executing the workbook_open or workbook_activate event procedures. Aparrently, you can do it by disabling events just before opening the other workbook and reenabling the events just after closing it. This only works if you do not execute an enableevents in the other workbook while processing in it. Hi, If you set your Macro security to medium or high then when you open the spreadsheet you will be prompted to enable or disable macros. If you select disable then your sheet will open but no code will run. Than ...Show All

• srividyaramesha Range

  Hello, I'm developing a macro to do some calculations on a worksheet, but I always get a problem when I pass a Range as an argument to my function. I need to pass the range as argument. For example: Sub Name() Dim A As Range Set A = Worksheets("Sheet1").Range("CD4") MyFunction(A) End Sub Function MyFunction (ValueDoRange As Range) etc... End Function Thanks Thank you Andy. Excuse me for my bad english I Have this code: Function InterpMatriz_lin(Rango, x, y) Dim T(1 To 100) Dim R(1 To 100, 1) Dim S(1 To 100) Dim A(1 To 100, 1) Dim U(1 To 100) Dim B(1 To 100) NumFilas = Rango.Rows.Count ...Show All

• Tarey Wolf Refer to another module

  I have a small problem with a macro. I have two different moduls in my code. In module1 i have the code for some buttons and so and in module2 i have the code for what happens if i press the buttons. However my code has trouble finding the different modules and I need help on how to write this properly. Code in module1: Sub Create_Menu() Dim MyBar As CommandBar Dim MyPopup As CommandBarPopup Dim button1 As CommandBarButton ..... Set button1 = .Controls.Add(Type:=msoControlButton) With button1 .Caption = "Button!" .BeginGroup = True .OnAction = "button1_Click" and in modul2: Sub button1_Click() Dim objChart As ChartObject Now I need help with how to refer to the sub. My code is quite mes ...Show All

• Skippy_sc Unable to set Xvalues property error

  Hello, I have been trying to write a macro in Excel VB for creating scatterplots using sorted data in a worksheet. When I read in this data in the form of x and y arrays and then try to create a plot from this data using the Xvalues/Values properties of the series on a new scatterplot, it gives me error. Funny thing is that for a particular column only this error is present. For other columns, there is no error. I have read past two threads on this problem and have ensured that both x and y arrays contain only plottable data, meaning that there is no element of x/y array which is empty or not defined. Here is the part of the code that causes this problem. dknt = 0 For l = 0 To d_rows - 1 If dta(i, m, 0, j, l) <> &quo ...Show All

• Ryan F Wireless Information into Excel Spreadsheet

  I am writing an excel spreadsheet to document problems that I am having with my wireless network/router. I want to add certain fields: 1) Count of wireless networks detected 2) Channel of Wireless network 3) Results of a ping How do I get this information through VBA (or VB for that matter) Hi, VBA and VB were released well before wireless networks where about so there is no methods or objects you can use. You'll need to, and this is your best bet, use a third party ActiveX/COM object. There should be network sniffer applications that collect the information your needing. to a file which you could then read into Excel. Hopefully that was some help. ...Show All

• BJHop String parsing in Express VB

  New to VB. Simply trying to parse the zip code out of a string and placing the zip code into a new string. Looking at the Split method, but unable to get code working w/o errors. Sample string I am trying to parse is: 'Bakersfield,A CAA 93309 Any suggestions on the code snippet to remove the zip out of this string Thanks in advance. CT Ah! Thread moved to the appropriate forum, they will help you more hopefully To parse the string, try this Sub ParseStringExample() ' Set up the string Dim strTest As String strTest = "A B C D E F;G.H" ' Tokenize by the Split() function, using space as a delimiter Dim token token = Split(strTest, " ") ...Show All

• focus_nz OK Trying Again - A Simple Very Simple Routine

  Could somebody debug the following for me. It is very simple. I need to loop through and open Excel worksheet processing each row until eof/ empty row. The WS contain 5 fields. 5 new fileds are created and appended to the row they were derived from. Sorry VBA is more complicated than I had expected. So.... do until eof loop ' reset counters Team_Member = 0 Team = " " Time_Played = 0 JB_Total = 0 CK_Total = 0 KK_Coach = 0 Total_Time = 0 ' select fields Date Time Team_Code Score Points ' from open worksheet row by row from ' c:\hamish's\matches.xls Date.Select Time.Select Team_Code.Select Score.Select Points.Select ' strip out 3 fields from Team_Code Team_Membe ...Show All

• Pure Krome Get Excel Sheet Names

  Hi: I am trying to connect an Excel file and get all sheet names in the file. When using ADO.Net, the sheet names contain letters "$, or ' " around the sheet name, not getting the exact sheet name. I wonder why. I am also trying to get sheet names by using Excel as a Com object in VB.Net, like: myExcel =CreateObject("Excel.Application") myWorkBook=myExcel.WorkBook.Open("my Excel File") For i = 1 to myWorkBook.Sheets.Count     myTableName(i) = myWorkBook.Sheets.Item(i).ToString Next But the code does not work. Does anyone know how Thanks. good day sir, can you give me the declarations that you use in "myExcel" and "myWorkbook" because i really ...Show All

• bergeron Select with macro based on criteria

  Hi, I am a newbie trying to self teach VB. I am pretty useless so please be gentle. I am trying to write a macro to allow me to select text in MS Word based upon its case. I want to select all the text in the document that is in all caps. Is this possible Also, is it possible to exclude 34 specific two letter strings of text The reason for this that specific "class codes" need to appear in in caps. Can anyone help As i said, i am pretty useless at this stage, so sample code would be awsome. Josha Write a line in you document for example Hello this is MYSELF writing this and then run this little piece of code Sub test() For Each wrd In ThisDocument.Words teststr ...Show All

• MaryV [OTP] VBA Visual Basic In Excel - Popup or Splash Screen

  I have created a simple program in VB inside Excel, When processing it takes a while so I created a form to display while processing, how do I get this form to show while the process is going but still allow the previous form to do its work, then the popup (splash) screen closes when the process has completed Nick Getz This is built within excel, so I assume Visual Basic for Applications, unless you can help me export it into Visual Basic 2005 Express Addition, whcih I downloaded after making significant progress on this application. Thanks. As you're using the VB within Excel then this is VBA (Visual Basic for Applications) which is a very different product from VB.NET and there are some other locations where y ...Show All

• Tryst How to fill worksheets with HTML

  Hi guys, I have a workbook which holds approx 5 worksheets, every sheet is a result from a transformations (XSLT). I've written a vba code that turns this transformations in html outpurs, now I'm desperally wondering to distribute every html result in each different sheet. Maybe I'm probably clutching at straws but, if you don't ask you don't get. In my VBA this string (sHTML) gets the transformation XSLT in an HTML format sHTML = xmlDoc.transformNode(xslDoc) I already tried this Application.Goto Plan1 ActiveCell.Value = sHTML ...and this Plan1.Range("A1", "E10") = sHTML But nothing fills this HTML output in one of my worksheet. Will be this impossible to do I just ha ...Show All