Microsoft Excell

Help On Vb Coding In Microsoft Excell
Checking this box (which we recommend) will create a cookie on your machine containing just enough information for us to log you back in when you return to the site and to support portions of our site written in ASP. This is also known as a durable or permanent cookie. If you don't allow cookies, we will still create a temporary cookie - also known as a session or memory cookie - but it will not be written to your machine. IE6 users can adjust cookie behavior by clicking Tools, Options, then going to the Privacy tab. The easiest way is to add 'www.vbcity.com' and 'vbcity.com' to the list of sites always allowed to use cookies, this will leave your other privacy settings in place.

---

VB And Excell W/out Having Excell Loaded
Can I use a program that retreives data from an Excel speadsheet on a machine that does not have Excel loaded?

Also, when I went to the references to set "Microsoft Excel 10.0 Object Library", it was not listed. Any ideas as to why it was not listed?

Any help or suggestions would be grealty appreciated.

---

VB5, Microsoft Excel, Microsoft Access, And Microsoft Word
I am currently using VB5 and I am trying to write a program that takes the data from an Excel file, copy and paste the desired data into a worksheet in the same workbook. I would then take that data, sort it, and then extract one type of data into one column and another type in the next column. With the data extract the code will tell Access to create a blank database and to import the data from the Excel file into a new table. After the importing the code will then match data from the Access file to data in a Word file. If there is a link, the code will then parse the data into the form.

Is there a way to do all of this?

---

RUN-TIME ERROR:[Microsoft][ODBC Microsoft Access Driver]cannot Update
Error message; Cannot Update1 Database or object is read-only?

please help me? i'm having a prolem updating my tblSubject in my database. here's my code:

Dim Record As New ADODB.Recordset
Private Sub Form_Load()
     SQL = "Select a.*, b.Subj_Desc, b.Subj_Units From tblSubj_Intrc a, tblSubjects b " _
        & "Where a.Subj_Code = b.Subj_Code"
    
    Record.Open SQL, MyConn, adOpenStatic, adLockOptimistic
    
    getFields
    SetLock (True)
    Set_Buttons
End Sub
Sub getFields()

    If Record.EOF Or Record.BOF Then
        MsgBox "Wala nay Recordord"
        Exit Sub
    End If
    
    txtDesc = Record!Subj_Desc
    txtSubCode = Record!Subj_Code
    txtUnits = Record!Subj_Units
    txtNum = Record!Num_Stud
End Sub
Sub ClearFields()
    txtDesc = ""
    txtSubCode = ""
    txtUnits = ""
    txtNum = ""
End Sub

Sub SetButtons()
    cmdAdd.Enabled = False
    cmdEdit.Enabled = False
    cmdDel.Enabled = False
    cmdSave.Enabled = True
    cmdCancel.Enabled = True
End Sub
Sub Set_Buttons()
    cmdAdd.Enabled = True
    cmdEdit.Enabled = True
    cmdDel.Enabled = True
    cmdSave.Enabled = False
    cmdCancel.Enabled = False
End Sub
Sub SetLock(Stat As Boolean)
    txtDesc.Locked = Stat
    txtSubCode.Locked = Stat
    txtUnits.Locked = Stat
    txtNum.Locked = Stat
End Sub
Private Sub cmdLast_Click()
    If Record.RecordCount > 0 Then
        Record.MoveLast
        getFields
    End If
End Sub
Private Sub cmdNext_Click()
    If Record.RecordCount > 0 Then
        Record.MoveNext
        getFields
    End If
End Sub
Private Sub cmdPrev_Click()
    If Record.RecordCount > 0 Then
        Record.MovePrevious
        getFields
    End If
End Sub
Private Sub cmdFirst_Click()
    If Record.RecordCount > 0 Then
        Record.MoveFirst
        getFields
    End If
End Sub
Private Sub cmdAdd_Click()
    ClearFields
    SetButtons
    SetLock (False)
    txtDesc.SetFocus
    EditMode = False
End Sub
Private Sub cmdSave_Click()
    If Not EditMode Then
        Record.AddNew
        Record!Subj_Desc = txtDesc
        Record!Subj_Code = txtSubCode
        Record!Subj_Units = txtUnits
        Record!Num_Stud = txtNum
        Record.Update
        SetLock True
        Set_Buttons
    Else
        Record!Subj_Desc = txtDesc
        Record!Subj_Code = txtSubCode
        Record!Subj_Units = txtUnits
        Record!Num_Stud = txtNum
        Record.Update
        SetLock True
        Set_Buttons
    End If
End Sub


Tnx1

 

---

Importing Microsoft Excel Files Into Microsoft Access Database?
Hello, I was wondering how to automate Microsoft Access to import a Microsoft Excel File? I can do it normally, but I want to know how (or what commands to use) so that my Visual Basic program will create a Microsoft Access database from a Microsoft Excel spreadsheet internally?

Any help will be appreciated - Thanks.

---

[Microsoft][ODBC Microsoft Access Driver] Could Not Delete From Specified Tables.
I've searched hi & lo and found alot of titles that read the same, but nothing that really addresses this situation.

The code below runs fine, until iCnt = 5, because the table is still held open by the previous Execute.
If I put a break on that line and run to that point, step that line, then continue the run, no problem. Works great.
But if I run it continuous from a cmdButton, I get the error.
I've tried transactions, different providers, more than default timeouts on command and connection, do.cmd runsql,....
This is one of those where I said, "sure, that's easy", about a month ago.

Dim ..., Cnxn As New ADODB.Connection

sPath = CurrentProject.FullName
Cnxn.CursorLocation = adUseClient
Cnxn.Mode = adModeReadWrite
Cnxn.Open "Provider=MSDASQL.1;DBQ=" & sPath & ";Driver={Microsoft Access Driver (*.mdb)}"

iCnt = 0
DoCmd.Close acForm, "Personnel List", acSaveNo
iCnt = iCnt + 1
Cnxn.Execute "DELETE ALPHA.* FROM ALPHA;", , adExecuteNoRecords
iCnt = iCnt + 1
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel7, "ALPHA", "file.xls", True
iCnt = iCnt + 1
Cnxn.Execute "DELETE [Civilian Backup].* FROM [Civilian Backup];", , adExecuteNoRecords
iCnt = iCnt + 1
Cnxn.Execute "INSERT INTO [Civilian Backup] SELECT Civilian.* FROM Civilian;"
iCnt = iCnt + 1
Cnxn.Execute "DELETE Civilian.* FROM Civilian;", , adExecuteNoRecords
iCnt = iCnt + 1
Cnxn.Execute "INSERT INTO Civilian ( [Full Name], [Rank], [Office Symbol], [Unit Desc] ) SELECT ALPHA.[Full Name], [PP] & '-' & [GR] AS Rank, ALPHA.[Office Symbol], ALPHA.[Unit Desc] FROM ALPHA;", , adExecuteNoRecords
iCnt = iCnt + 1
Cnxn.Execute "DELETE ALPHA.* FROM ALPHA;", , adExecuteNoRecords

What's the catch?
Thanks!!!

---

[Microsoft][ODBC Microsoft Access Driver] Not Enough Space On Temporar
Hi all,
----------------------------------
Set connData = New ADODB.Connection
connData.ConnectionString = Data_Master
connData.Open
connData.BeginTrans
connData.Execute "Delete * from feed_msg where date < date()"
connData.CommitTrans
------------------------------
at  conndata.execute following error is occuring,please update, can anyone please help me in this
 ''''''
-2147024882
[Microsoft][ODBC Microsoft Access Driver] Not enough space on temporary disk.


regards
John Philip

***  Even the Best, did the Bad and Made the Best ***

John Philip

---

[Microsoft][ODBC Microsoft Access Driver] Attribute Cannot Be Set Now
I have got an option to save a file in my program. This is the code to it:


Code:
Public Function saveblast()

Select Case flagsave

Case 1:
' Save only Blast Desing & these related information
On Error GoTo errortrap:
contoRCB.BeginTrans
Call addtodetail
Call addtodesign
Call addtoperformance
Call makestr
contoRCB.CommitTrans
Case 2:
' Save only Blast Desing & these related information
On Error GoTo errortrap:
contoRCB.BeginTrans
Call addtodetail
Call addtodesign
Call addtoperformance
Call makestr
flagfound = False
Call addtochrgsht
contoRCB.CommitTrans
Case 3:'........................

Now the error trap has the following code:


Code:
errortrap:
MsgBox Err.Description, vbInformation
contoRCB.RollbackTrans

Now when I disable the error trap it simply exits the function without performing the required operation & does not give any error message.

But with error trap enabled, I manage to get the above mentioned error:
[Microsoft][ODBC Microsoft Access Driver] Attribute cannot be set now

could somebody please help me

Thanks in advance

---

Why Can´t I Add The Microsoft Winsock Or Microsoft Multimedia Control To My Project?
I´m trying to add the microsoft winsock and the microsoft multimedia control to my project, but I get an error message saying that: "You don´t have the license to add this control in your design environment", or something like that.

Why is that, and how do I fix it?

---

Microsoft Excel And Microsoft Visual Basic
Hello,
I am currently attempting to constructed a program that interacts with an Excel file. In this excel file is just basiccly a spreadsheet on my savings. I want to make a program that interacts with this file by adding values to it and calcualting them

Heres a prototype .exe

---

Microsoft Has Deprecated The Microsoft Jet Engine !?!?
Hi
I can see in documentation that "Microsoft has deprecated the Microsoft Jet Engine, and plans no new releases or service packs for this component.
As a result, the Jet and Replication Objects (JRO) is being deprecated in this release and will not be available in any future MDAC releases."
You can find it on site http://msdn.microsoft.com/library/en-us/ado270/htm/ado_deprecated.asp

Does it mean that there is no future of mdb databases at all ?!

I've written so many code and now it is simply OBSOLETE !?
I am forced by microsoft to move to MSDE ?
I know MSDE very well but in many cases mdb is better.

May be will be some another set of objects with this functionality of JET?

I know I put too many questions but may be someone know what for example with programatically controlled replication of mdb files?
{I've managed it till now pretty well with JRO}
This what I really need - replication and synchronization of mdb databases controlled completely by my program.

thanks for any information

Tomek
--
{67B14976-ABB4-4A3B-869B-84B5CCA1F569}

---

Excell In VB 6
hey i am writing a program where i need to display an excell sheet and user form at the same time. the users make selections on the form with clicks. the info needs to be sent to particular cells on the sheet. i am using MDI with 2 forms one for the selections one for the sheet. i tried using the excell control but i can't seem to reference particular cells on the control. am i going about this the wrong way? there has to be a better way. i am a student so be easy.

---

Excell && VBA Help Please
Hello,

Please help. What I am trying to do, is grabbing a drawing name in Cells(x,2), automatically search the last modify date in C drive, and post the date in Cells(x,3). The current code works fantastic for me (Thanks for the helps from people in this forum), and currently I am just wondering for more options.

QUESTIONS:
1. Is there any way to automote searching my drawing file without having to list all my strPath? So i can just write the location is in "C:drawing able"
or this is even better if i can just list "C:drawing"
Can i apply this?

With Application.FileSearch
.NewSearch
.LookIn = "C:drawing able"
.SearchSubFolders = True
.FileName = "Run"
.MatchTextExactly = True
.FileType = msoFileTypeAllFiles
End With

2. Is there any way to put a browse button, so if it is not the right path, then i can browse & locate a new path location and enter it into the inputox
3. Because my folder locations for current & future drawings are in a separate folder, but still in the same sheet, i have to split up the code to
run from x=1 to 20 for CURRENT drawing & from x = 21 to 55 for FUTURE drawing)
Everytime i add more drawing files into the current or future drawing, i have to modify the x value and change the range. For a lot of updates, this is painfull'
Is there any VBA code that can distinguish current & future drawing. So when it scans cells (x,1) and finds a "FUTURE" word, it knows
that it's time to run the code from a different folder & popup the MsgBox.

Thank you for everybody who had been helping me before. I really appreciate your help.

ps: The questions above are also posted inside the code.


Excell File

1 2 3
A Status Name Last Updated
B CURRENT drawing1 11/12/2001
C drawing2 12/06/2001
D drawing3 30/03/2001
.
.
T FUTURE drawinga 12/04/2002
U drawingb 14/08/2002



CODE:


Private Sub Workbook_Open()

Dim strX As String
Dim strF As String
Dim strPath As String
Dim strFile As String
Dim oFile As Object
Dim FSO As Object
Dim intSheetIndex As Integer



'--------CURRENT-------------

strPath = "C:drawing ablecurrentmodel_A"
strExt = ".dwg"


'''QUESTION 1 ''''''''
' Is there any way to automote searching my drawing file without having to list all my strPath? So i can just write the location is in "C:drawing able"
' or this is even better if i can just list "C:drawing"
' Can i apply this?
'
'With Application.FileSearch
' .NewSearch
' .LookIn = "C:drawing able"
' .SearchSubFolders = True
' .FileName = "Run"
' .MatchTextExactly = True
' .FileType = msoFileTypeAllFiles
'End With
'
'
''''''''''''''''''''''



Set FSO = CreateObject("Scripting.FileSystemObject")

If MsgBox("Is the folder location of " & strPath & " the correct path?", vbYesNo, "Confirm Path") = vbNo Then
strPath = InputBox("Please enter a new path bellow:", "New Path", strPath)
End If

'''QUESTION 2 ''''''''
' Is there any way to put a browse button, so if it is not the right path, then i can browse & locate a new path location and enter it into the inputox?
'
''''''''''''''''''''''

If FSO.FolderExists(strPath) = False Then
MsgBox "Invalid path (" & strPath & ")" & vbCrLf & "Macro cancelled!", , ""
Exit Sub
End If

intSheetIndex = 1

' ********

For x = 1 To 20

' ********

With Application.Sheets(intSheetIndex)
strF = .Cells(x, 2) & ".dwg"

If Len(strF) > 7 Then
strX = Mid(strF, Len(strF) - 3, 4)

If strX = strExt Then
strFile = strPath & Trim(strF)
blnExists = FSO.FileExists(strFile)

If blnExists = True Then
Set oFile = FSO.GetFile(strFile)
.Cells(x, 3) = oFile.DateLastModified
.Cells(x, 3).Font.Color = vbBlue

Else
.Cells(x, 3) = "File Not Found"
.Cells(x, 3).Font.Color = vbRed

End If
End If
End If
End With
Next
Set FSO = Nothing

End Sub



'----- FUTURE -----------



strPath = "C:drawing ablefuturemodel_B"
strExt = ".dwg"



strExt = ".dwg"
Set FSO = CreateObject("Scripting.FileSystemObject")
If MsgBox("Is the folder location of " & strPath & " the correct path?", vbYesNo, "Confirm Path") = vbNo Then
strPath = InputBox("Please enter a new path bellow:", "New Path", strPath)
End If
If FSO.FolderExists(strPath) = False Then
MsgBox "Invalid path (" & strPath & ")" & vbCrLf & "Macro cancelled!", , ""
Exit Sub
End If
intSheetIndex = 1

' ********

For x = 21 to 55

' ********

With Application.Sheets(intSheetIndex)
strF = .Cells(x, 2) & ".dwg"
If Len(strF) > 7 Then
strX = Mid(strF, Len(strF) - 3, 4)
If strX = strExt Then
strFile = strPath & Trim(strF)
blnExists = FSO.FileExists(strFile)
If blnExists = True Then
Set oFile = FSO.GetFile(strFile)
.Cells(x, 3) = oFile.DateLastModified
.Cells(x, 3).Font.Color = vbBlue
Else
.Cells(x, 3) = "File Not Found"
.Cells(x, 3).Font.Color = vbRed
End If
End If
End If
End With
Next
Set FSO = Nothing
End Sub



''' QUESTION 3 '''''
'
' Because my folder locations for current & future drawings are in a separate folder, but still in the same sheet, i have to split up the code to
' run from x=1 to 20 for CURRENT drawing & from x = 21 to 55 for FUTURE drawing)
' Everytime i add more drawing files into the current or future drawing, i have to modify the x value and change the range. For a lot of updates, this is painfull'
' Is there any VBA code that can distinguish current & future drawing. So when it scans cells (x,1) and finds a "FUTURE" word, it knows
that it's time to run the code from a different folder & popup the MsgBox.

Thank you for everybody who had been helping me before. I really appreciate your help.

---

Again Help; VBA Excell
Hello Guys,

Please help out. What I've been trying to do is getting the drawing file in my local C drive (Cells(x,1) or D1, E1, F1,..M1), retrive the date, and then automatically post the date on the next cell (Cells(x,2) or D2, E2, ...M2)

------------------------------------------
Excell File:

1 2
A Drawing File Last Updated
B
C Table
D drawing1 12/12/2001
E drawing2 12/12/2001
F drawing3 12/12/2001
G
H Chair
I drawing4 12/14/2001
J drawing5 12/15/2001
K
L Other
M drawing6 12/18/2001

---------------------------------------------
Current Code:

Sub ShowFileInfo()

Dim fs As Object, f As Object
Dim x As Integer, FileName As String

For x = 4 To 6
FileName = "C:drawing able" & Cells(x, 1).Text & ".dwg"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(FileName)
Cells(x, 2) = f.DateLastModified
Next x

For x = 9 To 10
FileName = "C:drawingchair" & Cells(x, 1).Text & ".dwg"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(FileName)
Cells(x, 2) = f.DateLastModified
Next x

For x = 13
FileName = "C:drawingother" & Cells(x, 1).Text & ".dwg"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(FileName)
Cells(x, 2) = f.DateLastModified

End Sub

--------------------------
Condition:

- Every drawing file (drawing1, drawing2, ..., drawing6 is hyperlinked to an internal website)

--------------------------
Right now i have to specify a location of x for each file as you can see in my code. If it scans a blank cell, it will return an error message. For a lot of drawings, this is painfull. =)

Priority 1:
is there any way to scan automatically ALL Cells(x,1) (including the blank one and the title) to get ONLY the hyperlinked file and then post the result on Cells(x,2)?
Priority 2:
How about if i change the name format of my drawing file in excell by adding .dwg file extension (drawing1.dwg, drawing2.dwg, ...drawing6.dwg) so that the computer can just scan only this file and skip blank or non .dwg extension?

Please help. Thank you

---

Excell && VBA Help Please
Hello

I have a lot of drawing files, which are stored in my local C drive. Currently, I use excell to list the name of the drawing files' from A1:A50 spreadsheet rows . From B1:B50 rows, I put the date when the last time I save it (which can be found on the property of the drawing). The problem is i have to change the date in excell manually everytime i update/save the drawing. Is there any VB script that will automatically read the file name, find in the local drive, grab the last updated date, and put it on the excell? Please help. Thank you in advance for the help

---

Excell And Vb
Is it possible to save everything on a form (data in combo boxes) to an excell sheet and be able to load it and save it as a seperate file each time

---

Vb And Excell
i want to work from vb with excell as my DB!
is it possible?how can i use it?
can i make queris on it?
thnaks in advance
peleg

---

Using Excell
Can someone please post a simple working example of a VB program that takes an entered value and puts it into an excel file, and then saves the file. Also how to empty the contents of an array into a column and then save it.

I have found a few examples but have not been able to figure out how the code works, much thanks in advance.

~ Bryan J. Casler

---

Vb And Excell As A DB
i want to work from vb with excell as my DB!
is it possible?how can i use it?
can i make queris on it?
thnaks in advance
peleg

---

Regarding Ms Excell
hi,
I am accessing excel having some rows........i am storing value of each row in a array.......how can check whether last row is reached?

thanks and regards
vivek.s

---

Regarding MS Excell
hi,
i am using (oApp.Sheets(1).UsedRange.Count) / no of cols(in my old version before GURU gave me another solution)...........to find no of rows.....now i deleted 1 row in excel and re ran the program.......still it counts the same no. of rows as it initially did.......any way to rectify this?

Thanks
S.vivek

---

VB-Excell
I am woking with VB and Microsoft Excell. To work with Excell I have included Microsoft excell from reference.It is just updating some cells based on some conditions.It is working fine in stand alone machine.
My problem lies in networking scenario.
The problem is that our excell file is kept in a machine say server.Machine1 and Machine2 is accessing the server to update the excell database(Every 1 min interval) .When the time of updation by two machines are becoming the same,the server machine is getting hanged. I think some sort of locking is necessary so that other machine can't update that when one machine is accessing the excell database.Please give me some solutions.

---

Excell EOF
Hi,

I have to write an app that imports an excell spreadsheet into a database.

Does anybody know how I can test for EOF on an excell spreadsheet. At this stage I test for blank cells but this is not working for all scenarios.

Any help would REALLY be appreciated

---

Excell
hello,
i'm using a flexgrid to hold data. now i want to be able to export this to excel and able to import it back up.

can anyone point me in the right direction?

thanx

---

Excell With V.B
HI
I've a application that use with excell object
(Insertable objects - microsoft excell)
How can I add my own sub menu to the excell menu?
For example : between "View" and "Insert" I want to add
"Functions"
Thank you

---

Excell And Dao
Hi hope someone can help me, i need to write some values on a exsiting excell sheet how can i open it and write in a specific cell?? i have seen the examples for doing it on a new sheet but i cant find how to do it on an existing one, hope someone could help me thanx.

---

Using VB In Excell
Can anybody recommend a good book that will teach me how to use VB within microsoft excel?

---

Excell
I am using this code:
Set objChart = OLE1.object.ActiveChart

It's work on my computer but if I make a set up from this code and install it in a computer that does not have excell, I get
run time eror 91 .

what should I do ?

---

Excell
Any Tutorials on Reading / Writing To Excel Work Sheets?

---

Set Excell = Nothing?????
Hi, I am manupolating an excell spread**** in my program but at the end when I say set objexcell = nothing.. It doesn't do anyting.. I mean it doesn't close the object and next time that I want to run the sub it says that the workbook is in use. Anyway to force the object to close??? Thanks in advance

---

VB 5.0 And Excell
Can anyone suggest the best way in which I can save data be it from a text file, ado recordset, or whatever source to an Excel spreadsheet. Do I have to open an instance of a spreadsheet or a workbook ??? I'm confused. Any help greatly appreciated
Steve
VB Programmer
Steveflit@aol.com

---

A Sub In Excell
Hello,

How can I activate a "Sub" (the sub is located in a module) in an Excell workbook with a vb5 aplication.


for example:


this is Sub in Excell

Sub print_plan()

Call dbShopOrder.SearchOrders
Worksheets("plan").Activate
ActiveSheet.PrintOut

End Sub

greetings R@emdonck

[This message has been edited by R@emdonck (edited 12-11-1999).]

---

A Sub In Excell
Hello,

How can I activate a "Sub" (the sub is located in a module) in an Excell workbook with a vb5 aplication.


for example:


this is Sub in Excell

Sub print_plan()

Call dbShopOrder.SearchOrders
Worksheets("plan").Activate
ActiveSheet.PrintOut

End Sub

greetings R@emdonck

[This message has been edited by R@emdonck (edited 12-11-1999).]

---

VB + Excell
I'll admit im pretty much a VB noob so I may be asking a stupid question. My problem is I need to alter an existing Excell sheet quick and easy as it needs to be done weekly.

I want to record a macro in excel to do it however, I dont know how to write the VB to do a portion of the required steps.

The meat of my problem is this...
I need to indentify if certain columns have information, in the form of a date, located in them. If they do, I need to remove the information from said column as well as remove a monetary value from a different column. I also need to subtract that monetary value from the total at the end. BTW, this is for many, many rows of data. If it were only a few rows I wouldn't worry with trying to build a macro or a faster way to handle the change.

Other steps I need to take is simple, remove a whole column and recalculate the total after any deletion.

I was considering using an If/Then but as far as VB is concerned I honestly dont know where to start. Any advice would be greatly appreciated.

Will

---

Excell Help
This forum is the closest i can find for Excell help, so apologies if slightly off topic.

If i have a number of columns, one column containing a finacial value, the other containing sales peoples initials, and i need to count how many times a sales person has an account with a value greater than zero.

What formula do i need to use?

Many thanks and kindest reagrds



Howard

---

VB And Excell Help
Hi

Can anyone help, I need to get data from access to vb, and then onto a excell chart from there, tried sending a screenshot, but no luck, so if anyone can help, I'll email the screenshot through to you.

Thanx

Koos

---

Excell And Vb
What i've done so far is i export my data from an pervasive database to excell but now i need to caculate the sum of all the duplicate entries and export that to excel so that i will only give me the customer number the name and the sum of all the stuff he brought for the specific month.

---

Vb - Excell
Hi, i need to create excell histogram chart from BV6.
I do not have experience with this.
Can you give me code sample or dirrection.

Thanks'

---

Excell
Hi all,
i have data on Excell and i want to move it to access database.
can i do it and how?
Thanks,

---

Help Me, Please: VBA Excell
Hello i'm beginner In VBA Excell, and was necessary to create two scripts under Excell:
1. for numerical integration
2. for numerical differentiation
Please, help me.

---

Hmm Excell Or Rtb?
I need to know how to input things into a richtext box that are in a list view. I know how to do it but it looks really ugly . Does anyone now how to line it up so it looks like it does in the list view. Oh if your gonna tell me to export it to excell that's already been done this is for ppl witkout excell loaded.
can u please help !!!!!!
thanks

---

Excell
i am writing a macro for an excell workbook. I need to write a line of code that will check if a worksheet exists, and if it doens't will add it. I have no problem adding it if it does not exist, but cant come up with a way to check if it exists? If it already exists i get an error for trying to name a new worksheet the same as an exising one. I'm looking for something that will work like this

If "my worksheet does not exist exists" then
Sheets.Add.Name = "Week Summary"
End If

Thanks,
J

---

Excell
I am filling excel worksheetts' cells from macros,
using something like:

Worksheets("sht1").Cells(1,1)=7.

I want to give to this cell, the patterns & border of another cell, say cell :

Worksheets("sht7").Cells(iline,jcolumn)

I have to use (iline,jcoulmn) to point to the cell I copy the patterns & border from.

How do I do it?

(I use excell 97)

---

Excell
I am filling excel worksheetts' cells from macros,
using something like:

Worksheets("sht1").Cells(1,1)=7.

I want to give to this cell, the patterns & border of another cell, say cell :

Worksheets("sht7").Cells(iline,jcolumn)

I have to use (iline,jcoulmn) to point to the cell I copy the patterns & border from.

How do I do it?

(I use excell 97)

---

VB6 - Excell && Access
Hi, Firstly Many Thanks in advance for any help/comments.

I have a VB6 application that basically adds data to a database (access). Part of this information is a date in numerical form Ie DD/MM/YYYY. What i would like to do is take this date from the VB6 app and add it to a Excell sheet. So the sheet would have a monthly view of days acros the top say 1,2,3,4 and so on. What i would like is to take the date on my app say the 1/mm/yyy and put a 1 underneath the 1 on the excell sheet. Basically i want a excell sheet listing orders on specific days and i want to add the order date using the application.

I used to run a query to see how many orders within two dates, which worked fine, but now i would like to look at a sheet of 1 month and visually see when the orders were placed ( if this helps explain)

Thanks for any help/input

Paul

---

Is This Possible? : Excell With Adodc
well...in this part of the forum:
http://www.xtremevbtalk.com/show...threadid=59497
i tryed to ask something like this, but now i'm trying also to connect the adodc with excell files and it gives me an error:
"Problem with FROM..."

i use:
"Select * FROM Sheet1$ order by Column1"

what's wrong??

can someone put here an example?
thanks!

---

Excell && VBA Search Help
Hello,


Is there any additional vba code that can help me search my drawing file without having to list a full path/location of the drawing file in my drive C? so can just list BaseDir = "C:" and the macro will automatically to search all sub folders in drive c: until it finds the file that i list on excell.


code


Sub ShowFileInfo()

Dim fs As Object, f As Object
Dim x As Integer, FileName As String
Dim BaseDir As String, CurrDir As String
Dim PicName As String

For x = 3 To 4
BaseDir = "C:drawing able"
PicName = Cells(x, 1).Text
CurrDir = BaseDir & PicName
FileName = CurrDir & ".dwg"


Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(FileName)
Cells(x, 2) = f.DateLastModified
Next x

End Sub


Please help. Thank you



ps: in excell help, there is a getabsolutepathname command and

With Application.FileSearch
.NewSearch
.LookIn = "C:My Documents"
.SearchSubFolders = True
.FileName = "Run"
.MatchTextExactly = True
.FileType = msoFileTypeAllFiles
End With

But, i don't know if this will work in my case

---

HELP; Excell Formula Or VBA?
Hello,

My current task is I always update my drawing file every 2-3 days (autocad drawing files), save it in my local server under the same name, and change the date in the "last update" column manually. The drawing file is hyperlinked to be viewed locally online , so i can just double click the file to open and save it.

The files are so many. Sometimes, i got screwed up and don't remember when i update the drawing files after i update them. Therefore, I am just wondering if you can help me out. I feel that your skills are much better in excell &amp; VBA. Is there any way in excell formula or VBA to automatically change the date in "last update" section automatically when I double click to open the drawing file or after i save the drawing file?

Thank you in advance for your help.


ps: example

drawing file name last update Approved?
car1 12/12/01 yes
car2 11/10/00 no
car3 12/22/99 yes

---

Excell PLease Help!! Quickly!!
Can anyone please tell me how to manipulate an Excell spreadsheet as you would an Access database?

Is it possible to use DAO?

Thanks

---