как найти символ " в текстовом файле? - Microsoft Office Excel

mrBond007 · 28.08.2011, 17:46

Добрый день уважаемый All.

подскажите плиз, как найти символ " в текстовом файле с помощью vba?

Hugo121 · 28.08.2011, 17:59

Код:

Sub tt()
str_ = "11""22""33"
MsgBox str_
poz = InStr(str_, """")
MsgBox poz
End Sub

alex77755 · 28.08.2011, 22:30

Что бы найти символ в файле его нужно считать. Лучше целиком:

Код:

   Dim File As String, CF As String 
   'объявим пеpеменнyю для имени файла и его cодеpжимого 
   File = "d:\ca.log" 
   'ycтановим имя файла и пyть 
   Open File For Binary As #1 
   'откpоем файл для чтения 
      CF = Input(FileLen(File), 1)   'загpyзить в пеpеменyю CF вcе cодеpжимое файла 
   Close #1 
   'закpыть файл

а потом проверить наличие:

MsgBox InStr(1, CF, символ) покажет номер первого вхождения

mrBond007 · 28.08.2011, 23:08

Ребята спасибо! Все получилось.

28.08.2011, 17:59	#2
Hugo121 Старожил Регистрация: 11.05.2010 Сообщений: 5,166	Код: `Sub tt() str_ = "11""22""33" MsgBox str_ poz = InStr(str_, """") MsgBox poz End Sub` webmoney: E265281470651 Z422237915069 R418926282008

28.08.2011, 22:30	#3
alex77755 Форумчанин Регистрация: 14.02.2009 Сообщений: 753	Что бы найти символ в файле его нужно считать. Лучше целиком: Код: `Dim File As String, CF As String 'объявим пеpеменнyю для имени файла и его cодеpжимого File = "d:\ca.log" 'ycтановим имя файла и пyть Open File For Binary As #1 'откpоем файл для чтения CF = Input(FileLen(File), 1) 'загpyзить в пеpеменyю CF вcе cодеpжимое файла Close #1 'закpыть файл` а потом проверить наличие: MsgBox InStr(1, CF, символ) покажет номер первого вхождения помогу решить контрольные VB6, VBA (недорого) Alex77755@mail.ru

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
как заменить символ в текстовом файле?	mrBond007	Microsoft Office Excel	13	18.08.2011 18:13
В текстовом файле найти максимальное число и после него числы полиндромы	Simak63	Помощь студентам	0	09.04.2011 16:33
Как в текстовом файле распознать символ перевода строки?	mzelenyy	Общие вопросы C/C++	4	12.06.2010 11:30
Как можно убрать пробелы в текстовом файле?	zzz007	Microsoft Office Excel	1	20.08.2009 23:14
Как поменять строки в текстовом файле местами	_ares_	Помощь студентам	8	13.11.2007 02:14

28.08.2011, 17:46	#1
mrBond007 Пользователь Регистрация: 17.08.2011 Сообщений: 10	как найти символ " в текстовом файле? Добрый день уважаемый All. подскажите плиз, как найти символ " в текстовом файле с помощью vba?

28.08.2011, 23:08	#4
mrBond007 Пользователь Регистрация: 17.08.2011 Сообщений: 10	Ребята спасибо! Все получилось.