No.2
- 回答日時:
No.1です。
補足します。簡単なのは、「フリガナ」フィールドの置換で「カブシキガイシャ」をカットする方法でしょうか。しかし、データによっては余分なスペースが残ったり、それを削除するのが難しかったりしますね。そうなってくると結局、ソートで期待どおりに並び替えができないでしょう。
したがって、ある程度確実に、かつ自動でやるにはVBAで処理するしかありません。限られたスペースでは細かくご説明できませんので、ヒントということでお願いします。
【標準モジュール】
まず、下記ユーザー定義関数 CutStr を標準モジュールに貼り付け。
Public Function CutStr(strParam As String) As String
Dim aryCutWord
Dim i As Long
'カットする語を定義(財団や社団法人なども必要であれば、要編集)
aryCutWord = Array("カブシキガイシャ", "ユウゲンガイシャ")
For i = 0 To UBound(aryCutWord)
strParam = Replace(strParam, aryCutWord(i), "", , , vbTextCompare)
Next i
CutStr = Trim(strParam)
End Function
【ユーザーフォーム】
入力用ユーザーフォームには
1. 会社名入力テキストボックス:txtName
2. 会社名フリガナ入力テキストボックス:txtKana
があり、txtName のプロパティー「ふりがな」で txtKana にフリガナが全角カナで自動入力されるように設定します。そして、txtName の BeforeUpdate イベントなどで前述のユーザー定義関数をコールします。
以下は、サンプルコードです。
Private Sub txtName_BeforeUpdate(Cancel As Integer)
If Not IsNull(txtKana) Then
txtKana = CutStr(txtKana)
End If
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(Microsoft Office) Outlookメール 連絡先の検索について 〈 ご説明 〉 Windows PC の Outlook 1 2022/09/23 14:43
- 中途・キャリア 携帯販売の志望動機です。 私は4年と3ヶ月間●●株式会社で製造課という部署に勤めておりました。どうし 5 2023/01/16 18:27
- 確定申告 貸株金利を確定申告する際について 2 2023/03/09 14:57
- 就職 就職先 どちら 2 2022/09/29 18:54
- 株式市場・株価 名義書換しない株式 1 2022/07/14 22:07
- インターネットビジネス くらしのマーケット 1 2023/04/13 11:32
- 投資・株式の税金 一般口座で同一銘柄の総平均法のことで 1 2023/02/27 22:08
- その他(IT・Webサービス) 不動産会社を起業し、ホームページを作りました。その際に、弊社は「◯◯不動産(株)」なのですが、県外に 1 2022/05/26 12:02
- その他(資産運用・投資) 助けてください 株購入、配当について 正式なグリー株式会社から 身に覚えのない手紙が届きました。 手 8 2023/08/28 12:50
- その他(悩み相談・人生相談) 株式会社Ringは詐欺だと思いますか? 4 2023/01/19 21:03
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
データベースのINT型項目にNULL...
-
フォームで入力しても反映されない
-
passwordが入れられません・・・・
-
日付のテキストボックスに(例...
-
ユーザーフォームで数字にカン...
-
アクセスで数値型のフィールド...
-
EXCELのユーザーフォームで入力...
-
アクセスのテキストボックスの...
-
このオブジェクトに値を代入す...
-
カレンダーコントロールで複数...
-
Excelで入力したデータを自動的...
-
ACCESS 時間の入力方法
-
Access VBA でのフォーム名の取...
-
MA ACCESSデータベースに詳しい...
-
Accessで所要時間の足し算
-
アクセス2003 入力規則
-
エクセル 自動入力
-
ファイルメーカで経過月数を出...
-
アクセス2007 フォーム入力で...
-
Accessで主キーの最終番号を取...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
passwordが入れられません・・・・
-
データベースのINT型項目にNULL...
-
アクセスで数値型のフィールド...
-
フォームで入力しても反映されない
-
Access(office)のマクロの「値...
-
Excelで入力したデータを自動的...
-
日付のテキストボックスに(例...
-
Access2007 textboxに入力でき...
-
このオブジェクトに値を代入す...
-
アクセスのテキストボックスの...
-
ファイルメーカー 一ヵ月後の...
-
ユーザーフォームで数字にカン...
-
sqlldrの使用方法について
-
ACCESS 時間の入力方法
-
入力規則違反-任意のエラーメ...
-
Access2007、フォームのテキス...
-
Accessで主キーの最終番号を取...
-
ファイルメーカで経過月数を出...
-
Accessで所要時間の足し算
-
Accessのパラメータクエリに入...
おすすめ情報