Горячее
Лучшее
Свежее
Подписки
Сообщества
Блоги
Эксперты
0 просмотренных постов скрыто
3

Уважаемые читатели!⁠⁠

Я заранее приношу извинения за пропущенные знаки препинания и опечатки. Кто не может читать без запятых и видит только слова, а не картинку пожалуйста не мучайте себя и оставьте в покое мои посты. Если на ум приходит какая то история или события я стараюсь поймать мысль, а не париться где и как воткнуть запятые. Опечатки тоже случаются по причине что руки у меня совсем не офисные и палец занимает две кнопки на клавиатуре. Времени на корректорскую деятельность у меня напрочь нет. Своя небольшая компания пытающаяся встать на рельсы и консультации друзей с пароходов плотно занимают весь день до самого вечера. Очень очень мало времени, поэтому публикую рассказки утром и бегу по делам. Если увижу, что мои истории никому не интересны я спокойно уйду с Пикабу. В принципе я исчезну и так...Отпуск летит и я с тоской смотрю на календарь. Покой к сожалению не по карману.

Если будет интересно услышать от меня что то дальше из морских историй пожалуйста напишите. Буду благодарен. У меня нет цели прославиться или еще что. Я просто рассказываю истории из жизни современных моряков. В большинстве своем то что писалось или снималось про флот очень далеко от реальности. Персонажи в рассказах реальные люди, имена естественно изменил чтоб не надавали по шеям. И слава богу , что на английский язык это никто не переводит.

Заранее всем спасибо!

Чтение Примечание Авторский рассказ Текст
9
232

Ответ на пост «Excel. Картинка во всплывающей подсказке»⁠⁠1

Можно конечно и так. Но представьте, что у вас картинок несколько сотен и их нужно периодически обновлять/добавлять/удалять. Можно конечно делать это ручками, как описано у автора, но гораздо проще делать это через макрос:

Sub InsertPicturesInComments()
On Error Resume Next

Dim rngPics As Range, rngOut As Range
Dim i As Long, p As String, w As Long, h As Long

Set rngPics = Range("B1:B100") 'диапазон путей к картинкам
Set rngOut = Range("A1:A100") 'диапазон вывода примечаний

rngOut.ClearComments 'удаляем старые примечания

'проходим в цикле по ячейкам
For i = 1 To rngPics.Cells.Count

p = rngPics.Cells(i, 1).Value 'считываем путь к файлу картинки
w = LoadPicture(p).Width 'и ее размеры
h = LoadPicture(p).Height

With rngOut.Cells(i, 1)
.AddComment.Text Text:="" 'создаем примечание без текста
.Comment.Visible = True
.Comment.Shape.Select True
End With
With rngOut.Cells(i, 1).Comment.Shape 'заливаем картинкой
.Fill.UserPicture p
.ScaleWidth 3, msoFalse, msoScaleFromTopLeft
.ScaleHeight h / w * 5.4, msoFalse, msoScaleFromTopLeft 'корректируем размеры
End With
Next i
End Sub

Показать полностью
Инструкция Microsoft Excel Картинки Примечание Длиннопост Ответ на пост Текст
29
1097

Excel. Картинка во всплывающей подсказке⁠⁠1

Несколько раз напоролся на ситуацию, когда хорошая и удобная вещь протирается, рвется или иными способами приходит в негодность, а вспомнить, где я её покупал и за сколько, уже не получается, начал вести список вещей: какая вещь, где и когда куплена, по какой причине и когда пришла в негодность.

Но по описанию я сам не понимаю, какие именно штаны имел в виду, поэтому начал в эту таблицу добавлять и картинки. Но картинки распирают таблицу, получается неудобно и некрасиво.

Поэтому, когда узнал, что в Excel можно вставлять картинки во всплывающие примечания - очень обрадовался.

Поделюсь и тут этим способом, вдруг кому пригодится

  1. Создаём примечание Shift + F2

  2. Наводим курсор на границу примечания и нажимаем ПКМ

3. Переходим в «Формат примечания», переходим во вкладку «Цвета и линии - Цвет - Способы заливки»

4. В окне «Способы заливки» - во вкладку «Рисунок» и там, ткнув на кнопку «Рисунок», выбираем нужную картинку

Показать полностью 3
[моё] Инструкция Microsoft Excel Картинки Примечание Длиннопост
113
30

ЛЛ, ваша воспитаница?⁠⁠

Читаю книгу "Задача трёх тел" автор - Лю Цысинь. Доставляют примечания переводчика О.Глушковой:

Ранее переводчик направляла в Википедию гуглить эффект бабочки. Но там чуть более развернуто было.

Это сейчас тренд такой в книгопечатании?

Показать полностью 1
Скриншот Лига Лени Переводчик Книги Примечание
17

Как вернуть примечания в Microsoft Excel?⁠⁠

Доброе утро.
Путем таинственных манипуляций, мои примечания в ячейках Microsoft Excel превратились в комментарии. Причём эти комментарии я редактировать не могу.
Как вернуть мои примечания в Microsoft Excel?

Microsoft Excel Примечание Чайник Текст
21
Посты не найдены