Hi
Thanks for your reply.
The spreadheet data set - which yes, is a flat file un normalised databased is output from a large MIS (which unfornately hasnt got this user friendly GUIwhich facilitates executive level analyses. So, rather than importing this data set Excel / CSV etc)into MS...
Hi
I am developing a programmed solution using a graphical front-end which will allow users with limited competence using Excel to interrogate the underlying data set. This is a learner spreadsheet (ed context) with 280 learners (rows), 40 subjects (cols) with 5 cols relating to personal data...
Hi
I am prototyping VBA code to use in a wider app that I am building using Excel 2003. Trying to understand Find / findnext methods etc. However, with code below, how can I obtain the address in row, col format rather than traditional "A3" format for example in aCell.Address?
many thanks in...
Hi
Thanks, noted. Before I received your post I extended the if constructs as follows using Colums(index) as shown and this seems to work. Validation warning message helpful to user to constrain input values.
Private Sub DataGridRewards_BeforeColUpdate(ByVal ColIndex As Integer, OldValue As...
Hi
Eureka! Yes its clear now - and works as I wanted it to. Looking at one the arguments of the data grid BeforeColUpdate, namely 'Oldvalue'it should have been more apparent to me. So, many thaks indeed for your helpful responses. In the next week or so I shall experiment with the ado solution...
Hi
I note from your last post that the focus is on programming the ado recordset object. Since I am looking (at the moment anyway) on programming the dataGrid object, is there any way that this can be achieved or I will need the ado workaround - your last post. If so, despite your last post...
Hi
Thanks for post. Been trying for some time now to get a solution using your first suggestion. Code for event as follows. Basically, I assume that if the modified field value is out of range, the cell value would be returned to its 'original' value.
However, I cannot seem to trap the...
...& " ;Persist Security Info = false"
conn.Open
'Build an SQL string to select all the rewards currently in the file (tblRewards)
strSQL = "SELECT * FROM tblRewards"
adoPoints.Open (strSQL), conn, adOpenStatic, adLockOptimistic
Set DataGridRewards.DataSource = adoPoints
DataGridRewards.Refresh
Hi again
Thanks for enlightening me on this topic. You are a 'star'. will now continue to develop my solution!
Incidentaly, on an 'aside' since I have several grids (same context), each will show 'maths' Science' and 'english' data sets respectively each based upon a corresponding worksheet in...
Hi
Your solution worked fine using an ADO object on the form and the connection string suggested. I can now edit data in the Data Grid and the changes are written to the Excel File - data linked. Grid cell editing on the KeyDown event is a cool addition too!
Presumably this (implied) can be...
Thank you for resply. have noted point '2' in my coding. Can you advise how I can ensure (declare) objects of this type so they are never 'out of scope'.
many thanks again
Hi Andy
Perhaps my confusion stems from the fact that I am a 'beginner' in relation to the use of Data Reports and the Data Environment. Given the command below, the Data Environment1 object is a command in the Data Environment and strSQL acts as a 'filter' which returns records from the Stock...
...as well. Created a new command 'AllStock' as part of Data Environment.
Private Sub cmdPrint_Click()
Dim strSQL As String
g_strAllStock = "SELECT * FROM tblStock"
DataEnvironment1.AllStock g_strAllStock
End Sub
g_strAllStock contains correct SQL.
Sub called:
Public Sub...
Hi
See your confusion - sorry!. 'DataEnvironment1.Pupils strSQL' should read 'DataEnvironment1.Stock strSQL'. Trying to resolve problem with another dB!
There is a data Environment command called Stock' in DataEnvironment1 and against this 'tree' in the design Environment all the fields...
...data source is Data Environment 1?
Hope you can help. Suspect this could be a trivial issues but FAQ' s fail to clarify.
[code/]
Private Sub cmdPrint_Click()
Dim strSQL As String
strSQL = "SELECT * FROM tblStock"
DataEnvironment1.Stock strSQL
drStockSlip.Show
End Sub
[/code]
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.