自定义函数: ExcelExportCleaner ( text )

2020年6月8日 • text • 换行符

函数功能描述

来源: https://www.briandunning.com/cf/2386

作者:

作者原述: ExcelExportCleaner ( text )

猫壹佰描述:

更精准地将多行记录改为单行文本. (将换行符替换为空格)

测试文档下载:

调用范例

ExcelExportCleaner ( "Hi Marcus.¶¶My name is…" )

返回结果

"Hi Marcus. My name is…"

函数内容

/**
 * ==================================================================
 * ExcelExportCleaner ( text )
 *
 * PARAMETERS:
 *            @text (text) Text value
 * RETURNS:
 *            (text) An export friendly text
 * EXAMPLE:
 *            ExcelExportCleaner ( "Hi Marcus.¶¶My name is…" ) returns "Hi Marcus. My name is…"
 * DEPENDENCIES:
 *            None
 * AUTHOR:
 *            Marcus Nilsson, Square Moon Industries AB, marcus@squaremoon.se
 * PURPOSE:
 *            Returns the specified text in a format that is safe to export.
 * NOTES:
 *            none
 * REVISIONS:
 *            2017-04-10, Marcus Nilsson. Created.
 *            2017-04-11, Marcus Nilsson. Redesigned the custom function and made it recursive.
 *            2017-04-11, Marcus Nilsson. Added "Char ( 10 ) = "¶" = LF = Line feed.
 * ==================================================================
 *
 */

Let (
	[
		~patternCount1 = GetAsNumber ( PatternCount ( text ; "¶" ) ) ;
		~patternCount2 = GetAsNumber ( PatternCount ( text ; Char ( 13 ) ) ) ;
		~patternCount3 = GetAsNumber ( PatternCount ( text ; Char ( 8232 ) ) ) ;
		~patternCount4 = GetAsNumber ( PatternCount ( text ; Char ( 10 ) ) ) ;
		~patternCountTotal = GetAsNumber ( ~patternCount1 + ~patternCount2 + ~patternCount3 + ~patternCount4 )
	] ;
	If ( ~patternCountTotal = GetAsNumber ( 0 ) ;
		text ;
	// Else
		Let (
			[
				~substitutedText = Substitute ( text ; 
					[ "¶" ; " " ] ;
					[ Char ( 13 ) ; " " ] ; /* Char ( 13 ) = "¶" = CR = Carriage return */
					[ Char ( 8232 ) ; " " ] ; /* Char ( 8232 ) = "¶" */
					[ Char ( 10 ) ; " " ] /* Char ( 10 ) = "¶" = LF = Line feed */
				)
			] ;
			ExcelExportCleaner ( ~substitutedText )
		)
	)
)

当前页面使用FileMaker生成发布, 更新于2021年3月15日0时47分2秒

← 较旧的文章较新的文章 →