Takahiro_2002のプロフィール

不適切ならほんとにすみません どうしていいかわからないんです 感情がぐちゃぐちゃです　このままだと何か恐ろしいことになりそうです きっかけはこのサイトでの回答への、質問者からのお礼の一言です （別IDでの投稿ですので履歴のは無関係） 私は質問に対し、まじめに回答を書いたつもりです 何度も読み返し失礼の無いように、言葉も慇懃無礼すぎず軽すぎず選びました そのお礼に２ちゃんねるみたいなことをかかれました お礼飛ばしとかはどうも思わないし 反論もその回答への反論だったら私は責任を持って読んで考えるようにしてます でもあの２CHみたいな返しは耐えられなかった 私の回答のある一言を揚げ足とられて嘲笑されてました でも「ありがとうございました」はコピペで皆にあったので問題ないんでしょうね、カタチ的にはちゃんとお礼だし お礼ってなんでもありなんですね こんなことくらいで不安定になる自分はやっぱりおかしいですよね あれからそればっかり気になって何も手に付きません、たかがネットなのにと自分が情けなく、でもそれをきっかけにいろいろ嫌なことも思い出し、気にしないでおこうと思ってもだめです 何もできない　消したい そいつの顔がみえないだけに、よけいにあの嘲笑言葉がぐるぐると頭をまわるんです 自分でも情けないと思う、こういう自分にも自己嫌悪 読んで下さってありがとうございます 読んでいて不愉快をあたえたらすみません　 ほんとにどうしていいかわからない、これまでもいろんなこと落ち込むことはあったけど今回のはいつもと違う耐えられない こんなどうしようもない耐えられない気持は自分を殺すしかおさまらないのでしょうか　

何方か、回答をお願いします。 下記のマクロは、任意のフォルダに有る全てのxlsファイルのシート名が”Data”のみ 新しいブックにコピー（シート名は、元のファイル名に変更）をしていくマクロですが、 条件が下記のように変更になりました。 シート名は、DataとAppend*（*は数字で1～99）（Appendの数は毎回ばらばらでAppend シートその物が無い場合も有ります。）を選択して新しいブックにコピー （元のシート名の前に元のファイル名を足して新しいシート名は”ファイル名Append2” こんな感じにしたいです。）したいのですがどの様なマクロを書けば良いのか教えて 下さい。 Sub test-xls版() Dim myPName As String Dim myKAKUCHOSI As String Dim myPATHNAME As String Dim myLName As String Dim wb As Workbook Dim wb_New As Workbook Dim N As Byte Dim ws As Worksheet Dim myFN As String myPName = Application.GetOpenFilename("測定データ（*.xls;*.csv）,*.xls;*.csv") If myPName = "False" Then Exit Sub Application.ScreenUpdating = False Set wb_New = Workbooks.Add myKAKUCHOSI = Right(myPName, 4) myPATHNAME = CurDir myLName = Dir("") N = Len(myLName) myFN = Left(myLName, N - 4) Do While myLName <> "" Workbooks.OpenText Filename:=myPATHNAME & "\" & myLName, DataType:=xlDelimited, Tab:=True, Comma:=True, Space:=True N = Len(myLName) myFN = Left(myLName, N - 4) Sheets("Data").Select 'csvの場合無し Set wb = ActiveWorkbook wb.ActiveSheet.Copy after:=wb_New.Sheets(wb_New.Worksheets.Count) Worksheets("Data").Name = myFN 'csvの場合無し wb.Close savechanges:=False myLName = Dir() Loop Application.ScreenUpdating = True Exit Sub

ｉTune に入ってる音楽をCD-Rに書き込みしたいのですが、急にできなくなりました。以前は普通にできたので、その通りに試しても途中から、「ディスクの書き込みをキャンセル中」と出てきます。 その後エラーで、「ディスクの作成に失敗しました。不明なエラーが発生しました（４４５０）」と出てきます。 つい最近、読み込み自体ができなくなったのですが、なんとかいじってるうちに完全ではないのですが直りました。なんか関係があるのでしょうか。。。 知ってる方がいたら教えてください。おねがいします。 PC：WINDOWSXP　FMV-BIBLO　NB9/95 パソコンはあまり詳しくありません。

エクセルでファイルを開くときにマクロのセキュリティ確認が出ます。 そのファイルはマクロを使っているはずなのですが、ツール-マクロ-マクロと表示させてもマクロが１つも表示されません。 マクロはどこに隠されているのでしょうか？

営業系の仕事をしています。なかなかお客様とスムーズに会話できません…。何度かお客さんをイライラさせています…。どうしていいのかわからないので投稿しました。