Unlock a world of possibilities! Login now and discover the exclusive benefits awaiting you.
In my all reports on on Access Point, I am having problem by getting commas instead of dot.
Example: 123,45,88 instead of 123,45.88 (I also need Thousand seperator)
Reports work fine on my local machine.
Any changes need to apply on Access point side ?
Thanks
Hi Michael
Thanks for quick reply.
I know this is some strange. There is no point to upload sample QV as it's work fine local PC. I will check the setting as you said on server side tomorrow. But anyway I will send sample tomorrow.
Thanks again for your help
Hi Michael
Sorry for late reply.
I found the problem on server(comma instead of decimal point) as you suggested in this post.
I appreciate your suggestion ![]()
Thanks
Hi,
You can use replace function.
Hi Krishnama
Thanks for reply.
I have used comma for thousand seperation also.
Also my decimal place is also variable, user can select from 0 to 6 decimal (like 123,459 to 123,458.564823)
so hard code with replace I dont think possible.
I have used below macro code for export to excel, fyi
sub AdhocToExcel
'Set the path where the excel will be saved
filePath = "\\DBG.ADS.DB.COM\NYC-USERS-U\users106\parajen\config\Desktop\DB\Testz.xls"
'Create the Excel spreadsheet
Set excelFile = CreateObject("Excel.Application")
excelFile.Visible = true
'Create the WorkBook
Set curWorkBook = excelFile.WorkBooks.Add
'Create the Sheet
'first chart object
Set curSheet = curWorkBook.WorkSheets(1)
'loop
chartArray = Array("CHAD03", "CHAD04")
usedRows=0
For Each chart In chartArray
Set i = ActiveDocument.GetSheetObject(chart)
chartCaption = i.GetCaption.Name.v
curSheet.Cells(usedRows+1, 1)=chartCaption
i.CopyTableToClipboard true
' curSheet.Cells(usedRows+3, 1).Select '--> This line is same as below but skip one line between heading
curSheet.Cells(usedRows+2, 1).Select
curSheet.Paste
usedRows=curSheet.UsedRange.Rows.Count+3 '--->function to get the first unused row
Next
'loop end
excelFile.Visible = true
'Save the file and quit excel
' If we need to Save Excel file, Close & Quit Excel than remove comments for below 3 line, By commenting it will simly create & open excel
' curWorkBook.SaveAs filePath
' curWorkBook.Close
' excelFile.Quit
'Cleanup
Set curWorkBook = nothing
Set excelFile = nothing
end sub
HI Satish,
try with this function
To solve it you may need to use the Num#() function to interpret it correctly,
e.g.
Num#( Field, '#', ',', '.') as InterpretedField
Hi Avinash
It would not work because report placed on server residing Gemany, They have set up in Control panel(comma instead of decimal point) I need to overcome that set up. Works fine anywhere in USA.
Please let me know if you have any solution
I appreciate your suggestion, Thanks