ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   string truncation (https://www.excelbanter.com/excel-programming/276732-string-truncation.html)

ljorn

string truncation
 
Hi,

Using xl2000 my string is truncated to 256 characters. The point of
the loop below is to extract only the rows that are numeric (skip
nulls entered by user as a space) for plotting so that the axes remain
sensible. The macro's running in a module. No problem with the yPlot
string however the xPlot string is truncated at 256 characters and
causes subsequent problems. How can I get around this?

Thanks,
ljorn

Set vcRng = ActiveSheet.Range("G11:G18").Cells

Do Until ii = 9
If IsNumeric(vcRng(ii)) Then
If IsNumeric(tmRng(ii)) Then
If ii = 1 Then
yPlot = vcRng(ii).Address(RowAbsolute:=False, _
ColumnAbsolute:=False, ReferenceStyle:=xlA1)
xPlot = "=(" & tmRng(ii).Address(ReferenceStyle:=xlR1C1, _
External:=True)
Else
yPlot = yPlot & "," & vcRng(ii).Address(RowAbsolute:=False, _
ColumnAbsolute:=False, ReferenceStyle:=xlA1)
xPlot = xPlot & "," &
tmRng(ii).Address(ReferenceStyle:=xlR1C1, _
External:=True)
End If
End If
End If
ii = ii + 1
Loop
' xPlot = xPlot & ")"

...
ActiveChart.SeriesCollection(1).XValues = xPlot ' TRUNC. therefore
error


All times are GMT +1. The time now is 09:51 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com