引用符で囲む必要がある名前の長いリストがあり(二重引用符でも単一引用符でもかまいません)、約8,000個あります。引用符なしでExcelに保存しており、すべての名前をコピーして問題なく貼り付けることができますが、引用符はまだありません。各行の名前に引用符を追加するExcel式を探して探しましたが、運がありませんでした。また、いくつかの巧妙な検索と置換のテクニックも試しましたが、どちらも機能していません。私が探している形式はこれです:
「アレン」または「アレン」
それらのいずれも動作します。情報をデータベースに保存できるように、これが必要です。どんな助けも大歓迎です。ありがとう
PS:
私は他の人々がオンラインで私がしなければならない同じことを必要としていることを発見し、この解決策は彼らのために働いていますが、それで何が起こるかわかりません:
範囲変数(myCellなど)を使用して修正し、それを使用して、範囲オブジェクトの「選択」コレクションを繰り返します。
Sub AddQuote()
Dim myCell As Range
For Each myCell In Selection
If myCell.Value <> "" Then
myCell.Value = Chr(34) & myCell.Value
End If
Next myCell
End Sub
他のユーザーにも有効な別のソリューションは次のとおりです。
Sub OneUglyExport()
Dim FileToSave, c As Range, OneBigOleString As String
FileToSave = Application.GetSaveAsFilename
Open FileToSave For Output As #1
For Each c In Selection
If Len(c.Text) <> 0 Then _
OneBigOleString = OneBigOleString & ", " & Chr(34) & Trim(c.Text) & Chr(34)
Next
Print #1, Mid(OneBigOleString, 3, Len(OneBigOleString))
Close #1
End Sub
= """" & A1 & """"
__Public Function Enquote(cell As Range, Optional quoteCharacter As String = """") As Variant
Enquote = quoteCharacter & cell.value & quoteCharacter
End Function
_
=OfficePersonal.xls!Enquote(A1)
=OfficePersonal.xls!Enquote(A1, "'")
引用符で囲まれた永続的な文字列を取得するには、式の値と特殊値の貼り付けをコピーする必要があります。
データが列Aにあると仮定して、列Bに数式を追加します
="'" & A1 & "'"
そして、式をコピーします。 CSVに保存すると、引用符で囲まれた値が取得されます。 Excel形式で保持する必要がある場合は、列Bをコピーし、値を貼り付けて式を削除します。
簡単な手順:
引用する必要のあるセルにカスタム形式を使用しないのはなぜですか?
セル列にカスタム形式を設定すると、すべての値がその形式になります。
数字の場合....郵便番号のように...これは「#」になります文字列テキストの場合、「@」になります
ファイルをcsv形式で保存すると、必要に応じてすべての引用符がセルデータをラップします。
または、範囲を選択してセルを書式設定>カスタム\ "@ \"
ExcelファイルをCSV形式のファイルとして保存すると、すべてのフィールドが引用されるかどうかはわかりませんが、結果をデータベースに挿入するのに便利であることがわかります。