Thanks PHV. I am trying to specify VB6 so that people know what program I am coding in.
Thanks for your input I very much appreciate your swift response.
O.
Hi everyone,
I have a spreadsheet with information in some of the colums: ("A:Y").
I want to move(relocate the content of column "A" to any column that does not have data(values).
In other words, I want to cut the content of Column "A", loop through the rest of the columns to find a column that...
Please, I need some assistance.
I am importing data from an acces table (file) into Excel spreadsheet. The data type in the access table is "Number"(numeric). When copied from the access file to the excel spreadsheet, some of the numbers converts to date.
In the source file, the underlying...
I finally accomplished the objective with the code below:
Dim i As integer
For i = 1 To 256
If Application.CountA(Range(Cells(1, i), Cells(65536, i))) = 0 Then
Columns(2).Cut Destination:=Columns(i)
Exit For
End If
Next i
Thanks everyone.
Okey.
Yes, you are right. I want to move the contents of column A to the empty column, then delete column A. The idea is that since I may not know which column does not have data in it, I want it to check ( like loop thru the columns)to find which column is empty, then move the sourcd to that...
Good morning gentlemen,
I am working with VB6. Please, I need your assistance. I have a spreadsheet with 4 columns containing data. The 5th column "E" has no data.
----A----- -B-- -C- ---D--- ---E---
Totalhours|Name|Age|Address|
---------- ---- --- -------|-------
0000000005|Jack| 35|New...
Good afternoon,
please can someone show me how to move the content of a column in excel spreadsheet to another column in the same spreadsheet and also to set a specified range of columns to 2; for example I want Columns size of "D" thru "X" to be 2.
Thanks.
Okey.
By variable cope, I am assuming you mean using a variable depending on where it is defined: either locally or globally or within procedures.
Thanks.
Okey.
Hello Mr. PHV,
I've got one more question: "How then do I combine the skip function and my heading module since both are using integer (i)?
I mean;
function NewValue(sVal as string)
dim i as integer
for each i in len(sVal)
select case ucase(mid(sVal,i,1))
case " ", "_", "A" to "Z", "0"...
Thank you for your response. What does the above function do?
Below is the routine that I am using to write my report headings in the excel report, then after the headers are written, I then do my CopyFromRecordset to import/write the detail section.
CODE:
=====
Dim i As integer
Dim rsin As...
Good morning everyone,
Please I need your assistance. I generated an excel spreadsheet (report) from access file. I have the report headings in Cell (A5) all the way accross to Cell(Q5). I mean, each cell, starting from A5 through Q5 contains the entire 17 headings(fields). On display, the...
Hi "ajetrumpet",
thanks for your response. I used a straight "SELECT" statement to populate the recordset, then used "CopyFromRecordset" to import the record into a spreadsheet. You said something about manually fixing the import, How can I manually fix the import? Do you mean inside the...
I used fuction:"CopyFromRecordset" to move data from access file to excel spreadsheet. When I display/print the contents of the spreadsheet, the records are too far apart. Also, each cell size is very large. How can I get the records to display/print normally, like close enough: for example...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.