Hi all,
I work as a Radio Qos Engineer and do some programming using VBA and Visual Basic. I have just started learning Unix and have had my hands on Oracle( Introduction to Sql).
I love programming very much and am at my best whenever am programming but am a little bit challenged on how to develop myself in this area. I would love to know a lot of programming languages, to be a guru in all if possible. How to go about it is my challenge....
User Profile
Collapse
-
Career Development In Programming
-
[resolved]
Thanks so very much for all your help. I discovered where the problem was coming from. in the range for the sort, i didnt select all the columns which had values, i stopped at "CN" instead of "DJ". I have decided to avoid any future errors i would select it up to the last column on the sheet which is "IV".
This is the working code now
Code:Sheets("No Counters").Rows(1).Value
-
-
Sorting producing wrong result
I have an excel sheet containing some indictators which I sort to help me analyse my system. After running the macro I discovered that some columns no longer have the right values , like it didnt sort well, probably sort just one column without carrying the other columns related to it.
e.g, lets say I have these columns and i want to sort by age DESCENDING
NAME SURNAME AGE
JACK JILL... -
I have resolved it. The issue was that .xls was not included in the file name. Thanks for all your help.
Below is the code that works now
Code:Dim Today As Date Dim Todayb As String Today = Cells(1, 1) Todayb = Format(Today, "dd-mm-yyyy") Todayb = Todayb & ".xls" Windows("cells.xls").Close savechanges:=True, Filename:="c:\Daily_Alerts\Daily Alerts_"
Leave a comment:
-
I think, it seems like I cant put them into another. You know when runnig the macro, each of those sub, you see them separately, meanwhile you run one which calls the other as it runs. I thought there was a way to embed them into the main code so when you do alt-f8, you dont see them as separate macros.Leave a comment:
-
Need a replacement for sub underneath sub
I have a VBA Program that has a sub embedded in a sub, i feel there is a better way to do this but cant find it. Can you please help me this is a part of the code
Code:Sub Daily_Alerts() ................ Selection.End(xlUp).Select ActiveCell.Offset(0, 1).Select ActiveCell = "BSC" Cd = 4 Cc = Selection.Column
-
Adding Date to File name
Hi, I have written a VBA program that runs on Excel and puts data on the excel sheet. This runs everyday. I want to be adding the dates to the files, this date is gotten from the excel sheet that uploads into the report excel file. Below is the Code I wrote which doesnt work, please could you help me
Code:Sheets("Matrix sheet").Select Today = Cells(1, 1) 'The location of the date on the raw sheet
-
Sony Vaio VGN-N17C_W drivers
Hi,
I have a Sony Vaio system with Model no VGN-N17C_W, it was mistaken formatted and now all the drivers are gone. I can't seem to be able to find the drivers online,I cant even find the system model on sony site except on chinese site an I cant read the site. Please could someone help me get the drivers.
Thanks. -
Importing in Access creating dublicate table
I was given a database program in Access to improve. This included enabling an exported table in excel which after update should be able to import back into the previous table.
The issue is that the table name has a space. I tried putting it in brackets but this is causing it to be duplicated adding 1,2... to the end of the table name.
I tried changing the name but there are so many codes, macros and queries attached to this table.Please... -
Error In running packaged program
I developed a program using VB6 and access as the database. I used ADO connection. I have packaged it and installed it on the server on which it runs properly but when I run the shortcut exe file on other system (Client) and try to open the forms that display the data from the database, it tells me Run-time error ' 713', Class Registered looking for object with CLSID:{59245250-7A2F-11DO-9482-00A0C9111OED}.
I used google to search for the solution... -
RESOLVED
Thanks for all your help. I discovered Action as a reserved word in VB, changed the column name and now it works.Leave a comment:
-
Error in Updateing my table
I am trying to update my tables, and this error occurs
Runtime error '-2147217900 (80040e14)':syn tax error in update statement only for the table Action types.This is the code
and where error occurs is in Bold
Code:If frmAdd.Caption = " CITY " Then StrSql = "UPDATE City SET CITY = '" & Text1.Text & "' WHERE CITY _ = '" & OldVal & "'"
-
[RESOLVED]
Thank you very much.I removed the single quote and it works very well.Leave a comment:
-
Locking and unlocking DataCombo via code
I have tried to lock the combo via code using
Code:DCSearch(1).Style = dbcDropdownList
I would have just sent it in the form without codeing but I open that particular form in two place and one needs for it to be locked.
Please help. -
Searching the database for numbers
I have a database that some coulmns containg numbers and I need to search using the value inputted in a text box. Am unable to do it with this code
Code:If Combo1.Text = "Result" Then RSSearchS.Open " SELECT * FROM follow WHERE Result = '" & Text2.Text _ & "' ORDER BY Workorder", CnWorkOrder, adOpenDynamic, adLockOptimistic
-
[RESOLVED]
The issue has been resolved by changing
Code:StrSql = "SELECT txtVEHNO, dtmVLEXP FROM tblVEHLIC WHERE dtmVLEXP >= #" & IssDt & "# AND dtmVEHEXP <= #" & ExpDt & "#;" Set RsQry = AdVehDecp.Execute(StrSql)
Code:RsQry.Open "SELECT txtVEHNO, dtmVLEXP FROM tblVEHLIC WHERE dtmVLEXP >= #" & IssDt & "#
Leave a comment:
-
the dates have already been formated before being stored.
This is the code for IssDt and ExpDt
Code:IssDt = Text3(0) + "/" + Text3(1) + "/" + Text3(2) ExpDt = Text3(3) + "/" + Text3(4) + "/" + Text3(5) IssDt = Format(IssDt, "DD/MM/YYYY") ExpDt = Format(ExpDt, "DD/MM/YYYY")
Leave a comment:
-
-
Retrieving a range of dates from the Database
I am trying to retrieve dates from the database using a range.
This is the Code I am using which is giving me an error
Code:Public AdVehDecp As ADODB.Connection Public RsQry As ADODB.Recordset Public StrSql As String Set AdVehDecp = New ADODB.Connection Set RsQry = New ADODB.Recordset AdVehDecp.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\VEHICLE_TRACKER.mdb;"
No activity results to display
Show More
Leave a comment: