Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1 2 3 След.
RSS
Три точки при вырезке текста...
 
#1
26.06.2010 20:50:13
Всем планетянам, доброго времени суток, давно уже тут не был...  
 
Вопрос такой, нужно создать некий тест на знание, есть колонка в которой написаны определения, рядом колонка с вариантами ответов, задача такая:    
 
1.когда в колонке с определениями я вырезаю какое-то слово или предложение надо чтобы ексель автоматически заменял его троеточием  ...      
 
2. и второе (просто пишу чего хотелось бы, не знаю реально ли это)нужно чтобы вырезанный фрагмент, слово или предложение, появлялся в другой колонке, как один из вариантов ответов (остальные варианты дописываю сам)  
 
правильный, выразаный, ответ должен вставляться в одну из четырёх ячеек, только не в одну и ту же, возможно её можно будет выбрать, или будет работать какая то закономерность (если так, было бы не плохо если бы её можно было менять)  
 
Возможно ли такое?
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#2
26.06.2010 21:00:02
В принципе, возможно. Нужно подумать. Быстро не обещаю(дергают регулярно), но до утра... Если подождете.
Я сам - дурнее всякого примера! ...
 
 
 
#3
26.06.2010 21:02:39
Подожду, спасибо большое, оно не то чтобы очень срочно, просто хотелось бы. Постоянно приходиться с этим сталкиваться и тратить много времени...
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#4
26.06.2010 21:11:40
А почему бы не КомбоБокс с вариантами ответов?
 
 
 
#5
26.06.2010 21:15:53
проверка знаний проходит на бумаге, о, если бы была возможность посадить всех за комп. но оценивать приходиться группы людей одновременно и потому распечатываем тест и карандашиком выбираем правильный ответ, по старинке :-)
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#6
26.06.2010 23:18:55
awindelf, вот объясните Вы мне, дураку - нафига нужно было наобъединять столько ячеек? Держите ответ. Вырежте любое слово из названия темы. А уж с ОЯ разбирайтесь сами. Макросы д.б. включены.
Я сам - дурнее всякого примера! ...
 
 
 
#7
26.06.2010 23:28:08
ошибку признаю,(думал что этот вопрос поднимется)пример исправлю, ОЯ удалю  
 
 
PS шаблон создавался давно, тогда возможности екселя были сокрыты от моего ума, :-)и задумка была все делать на бумаге ... вобщем виноват, молодой, исправлюсь ...  :)
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#8
26.06.2010 23:33:37
Так чуть лучше.
Я сам - дурнее всякого примера! ...
 
 
 
#9
26.06.2010 23:35:52
Когда исправите шаблон, поправлю код(если сами не разберетесь со смещением).  
А я спать:-)
Я сам - дурнее всякого примера! ...
 
 
 
#10
26.06.2010 23:40:51
чего то не получается...  
 
пример переделал, совсем удалить ОЯ не получилось, если это очень очень важно и делает невозможным решение вопроса - буду думать как их удалить совсем, пока сделал так, условие остается тем же  
 
посмотрите пожалуйста...  
 
открываю 2010 офисом, макросы вкл.
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#11
26.06.2010 23:44:05
А с какой вообще целью изначально выбрана такая ширина столбцов?
 
 
 
#12
26.06.2010 23:44:16
{quote}{login=KuklP}{date=26.06.2010 11:33}{thema=}{post}Так чуть лучше.{/post}{/quote}  
 
не пойму, или я что то не то делаю, не работает почемуто,    
 
но давайте по новому шаблону, почти без ОЯ
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#13
26.06.2010 23:44:19
Ай, красиво! Не нагляжусь. Где пример-то?
Я сам - дурнее всякого примера! ...
 
 
 
#14
26.06.2010 23:45:28
{quote}{login=KuklP}{date=26.06.2010 11:44}{thema=}{post}Ай, красиво! Не нагляжусь. Где пример-то?{/post}{/quote}  
 
ссори, забыл кнопочку нажать :)
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#15
26.06.2010 23:47:24
{quote}{login=Юрий М}{date=26.06.2010 11:44}{thema=}{post}А с какой вообще целью изначально выбрана такая ширина столбцов?{/post}{/quote}  
 
что бы усе влазили на А4 и влазило нужное кол-во букв т.е. нужное определение
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#16
26.06.2010 23:59:32
А так?
Я сам - дурнее всякого примера! ...
 
 
 
#17
27.06.2010 00:07:23
по расположению, будем смиряться, а по роботе макроса чего то не то, вырезаю в колонке с определением ничего не происходит.  
 
нужно чтобы если в колонке с определением вырезать слово, то появлялись три точки вместо него а это слово появлялось в одном из вариантов ответов
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#18
27.06.2010 00:21:32
Ну вот я по очереди наобум вырезал слова. Все заменилось троеточиями и в случайно порядке вставлялось в соседние столбцы. У Вас макросы точно включены?
Я сам - дурнее всякого примера! ...
 
 
 
#19
27.06.2010 00:24:04
Ну KuklP, монстр, я уж хотел написать, что бестолковая задумка, что проще нажать Ctrl+X и вставить в ячейку вырезанное, а тут такой ход... сохранил в загашнике, может пригодится сравнение строк - не было у меня такого кода в примерах.  
Всё там работает, вот только вероятно тут надо так написать:  
   For i = 0 To Len(a)  
       B(i) = Mid(a, i + 1, 1)  
   Next  
было To Len(a1).  
Так надо,KuklP?
 
 
 
#20
27.06.2010 00:26:41
Только что-то рандомизе глючит, в 4-у ячейку не хочет писать из 10-15 попыток...
 
 
 
#21
27.06.2010 00:27:18
{quote}{login=Hugo}{date=27.06.2010 12:24}{thema=}{post} бестолковая задумка, что проще нажать Ctrl+X и вставить в ячейку вырезанное{/post}{/quote}  
 
так и делали всё время, и если вопросов более сорока -  то это занимало очень много времени
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#22
27.06.2010 00:28:29
Я уже засыпаю, голова не варит. Hugo, исправь, будь другом. У меня-то и так работает.  
24224:-)
Я сам - дурнее всякого примера! ...
 
 
 
#23
27.06.2010 00:30:29
Вот так рандомизе равномерно работает:  
Sub tt()  
 
For x = 1 To 100  
   k = Int(4 * Rnd) + 1  
   If k = 0 Then k = 1  
Debug.Print k  
Next  
 
End Sub  
по примерно 25 попаданий в каждое число.
 
 
 
#24
27.06.2010 00:32:18
Исправляю - в коде замените эту строку на эту :) (добавьте +1)  
k = Int(4 * Rnd) + 1
 
 
 
#25
27.06.2010 00:37:37
Ну и тогда    
If k = 0 Then k = 1  
лишнее, т.к. к никогда не будет =0
 
 
 
#26
27.06.2010 00:43:39
в 2007 работает, в 2010 не хочет (точнее через раз)  
 
как происходит выбор ячейки для вставки ответа, нужно чтобы можно было выбрать, или чтобы он вставлялся сам в разные ячейки, не в одну и ту же постоянно.    
 
и на листе может быть до 70 вопросов
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#27
27.06.2010 00:46:08
{quote}{login=Hugo}{date=27.06.2010 12:30}{thema=}{post}Вот так рандомизе равномерно работает:  
Sub tt()  
 
For x = 1 To 100  
   k = Int(4 * Rnd) + 1  
   If k = 0 Then k = 1  
Debug.Print k  
Next  
 
End Sub  
по примерно 25 попаданий в каждое число.{/post}{/quote}  
 
 
я вообще не понимаю о чем вы,    
это вы по моему вопросу или просто так между собой общаетесь ?    
:) Не плохой язык для общения ...
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
#28
27.06.2010 00:56:31
Да по Вашему. Там в 4-ю ячейку не писало. А это я тест делал, так пишет. Потом ниже Вам рекомендации...
 
 
 
#29
27.06.2010 01:01:41
Равномерность сейчас ещё раз проверил:  
1 -21  
2 -29  
3 -25  
4 -25  
В первую чуть реже, во вторую чаще попадает.
 
 
 
#30
27.06.2010 01:10:20
вставьте макрос в этот файлик пожалуста, чтоб работало все, я совсем не понимать в макросах, куда чего засовывать не знаю :(
Единственная причина для существования времени — чтобы все не случилось одновременно. А. Эйнштейн
 
 
 
Страницы: 1 2 3 След.
Читают тему
Наверх